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V proqrai™e. Da ware zum einen 


m 


"Automarkt " fiir den BX Spectrum 


. 


Sufe 1.= ; Horn 5,» Bin f3B.hral.pht— 


\\ " 


P* wagenhandler Ihr Gliick versuche: 




Hf > konnen. Das zweite Topprogramm 
^Kff / heifit "Tennis" urtd ist fur den 






TI 99/4A geschrieben. Hier 








»■: nnen. 




e Spiele-Fans unter unseren Spectrum- 




haben wir ein besondeces Oberraschunqs- 




( ?sc+nu>t. Insgesarat rund 50 Titel stehen 




-fiigung. Da lohnt sich die Uberrascnung 


auf je 


den Fall. 


Fiir TI 


-Fans interessant ist wohl auch die im 




urgestellte neue Software. Es sieht so 




s wiirde es beim TI ein unerwartetes 


Wieder 


aiifleben geben. iu wunschen ware es 



fihnliches gilt im Sinclair-Bereich speziell fiii 
die QL-Besitzer . Audi sie haben in den letzten 
Monaten eine wit-durbuiebusig ihres Computers 
erfahren. So haben auch wir hier im Heft unsert 
QL-Informationen Stiick ii»i Stijck erweitert. 
In dieser Ausqabe sind es rund 10 Seiten ge- 
worden . 

Ich hoffe, daa die qenannten wie auch alle 
anderen Leser in dieser Auegabe wieder die 

richtigen Tests, Berichte und Listings 

finden und wijnsche Ihnen alien damit viel Spafl 



~(I&im (&/ 



i 
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INHAL TSVERZEICHNIS BeiunskonnenSie 
^^^^^^^ mitmachen 



BaaaaBBEEEggM 



1. Iinjen stolluMi Liad Ihre Mcinunf 



Compuier-Kontakt ist die Homccomputc 
zum Miunadien. Sie kiinnen hei uns Progran 
sendcn, Bilcher bespredien. Spiele btsehrdb 
urn! Tricks schicken 
sagen. Wir hab 
aber line l-linscndung sdindi bearheiten kiinneri und 
allei mil 'i-diicii Orjii .miidi;. mii-men Sie foi^-rulc 
i'unkte heachten: 

fon urui r.iriwirduilsium cnilialien. 

2. Geben Sit genau an, welches Oerai Sie baben. 
[.aufl das Programm fit. mil SuddiLTurwdleruri- 
.;■; -'-'ii; =.- ■ .11 1 i± 1 1 . miiisen diumi uubcdingi 
angegeben weiden. 

3. Zu jedem Programm sollte eine Programmbe- 
sclirdbung bdlicimn Di-.-w k.nin mil der Schreib- 
uiasdiine cider mit einem Drueker gesdirieben 
sein. Der Zeilcnabstand iiillU 2 Zciicn Ixitragen. 
damitnoch KmTekttiren ocm .Anmerkungeneinge- 
iiigl wurden kiinnen. 






I. Zu jedem Programm gehbrt gnjnd(3i7lic 
sting und eine Cassette oder Diskette Wenn I 
aberkeinen Drueker hahen,reichtauch der Dati 
ttSger. Speichern Sie ?ur Sichcrheit das Progran 
zweimal ab. Cassetten und Disketten kiinnen > 
nur zuriicksenden , wenn Riickporto beiliegt. 




6. Wenn wir ein Programm von Ihnenabdiuckeii. i 
giiten wir cin Hunorar hv: den e.inmaligen Abdruck 
und die Nullum ,!:'■ I'lvgranims in unserem C 
settenservice. Die liiibe des Honorary richtet i 
nach derLiinge und Qualilai des Programms. ' 
vergiiten im ailgemeincn bis mi 300 L>\1 fur 5 
gute Programme kami i-i audi mehrsein. 

7. Mi( del Einsendung gibt der Verfasser die Zubiim- 
mung zum Abdruck und crklart, daB er Urhcber 
der Teste und Programme ist ui 
schiiinkte Nui?u:iiiroehi diinm b 

' r Progran 






in Urheberrecht und kdn Nut 

bei Abdruck durch uns etw 
.tzanspiiichc vi.m seilt'n Diittcr •. 






Die nachste Ausgabe 

• Computer konlakt 

erscheint am 27. Juli 1987 



o-mpui„Ko~..B>7,a7 TOPPROGRAMM DES MONATS s 


Jk lactufcm im let/ten Heft kcin lopprogramm ver- 








IXlelli.niliCiii wurde. brinneri wir riiesmal slritl] 
■ lzwei. Es hiiiidelt >idi datvi -mimal urn das Pro- 






gram™ "Tennis", mil dem jeder TI-WlA-liesitzei 








jeut seine Kuckhand irfjinic-ren kanrt. N'dvn del Rea- 








litaMialte bietct das Spiel eine 3-D -Animation des 




V*' 




Balles und der Scldaiiu .ouie liner Sthalleti auf dem 






grtinen Rasen. 






frffc. 


Program miar li-ir dieses S-Jid uVr ITjahriae Dietmar 








Auguslin am Ktilsl. Fr bcsuclu das Gymnasium mil 








Schwerpunkt Maiin-matik und Spruclien. Seinen Tl 








hat er iibrigens sehoii seit 1V83 Kiir/lirfi ist nun noch 
oin Amiga hiiviigekmtimeri. don Ibelmar zurelektro- 






. ■ ■ 






nischen Mnsikerzeugung und zur Program mie rung in 






Pascal mitzt. 






; 1"*l S»""™jJuJlM ,S 


Das zweile T.i)ipms;ran:r'.: [.! da> Spiel "Automurki" 






» '»-:."«-• 


I'iiideu Spectrum. Hi er soil der Spieler vcrsuehen. sicli 








;jls seibstandiikT C ;'■■ r . i uc Si tw a icn handler durclis Le- 






. 


ben /.! s.-hla S cu. Wiv ,„ der W.rklichkdl audi, muBer 






stiindtg Enrscheiduiigen rreffen und versudiun, rials 








der 'Laden" hochkomml. 








Der Autor dieses Spiels hdUs Arnold Niodrau und 








wohntinRadevunmvald. Frist l.i.lahre alt mid hesitzi 








seinen Spectrum seit ca. drei Jahreu. Angelnru'.en h;i: 








bei ihm die Compulcrei mit eiuem ZX SI . dann folate 








der Spectrum und \uu\ will sicli Arnold mit den 1.0(10 








DM Ilonorar einen i'C anschaffen. 









Das Topprogramm "Tennis" f inden Sie hier Im Heft ab Seite 98. 
"Automarkt", das Topprogramm fur die Spectrum-Fans, be- 
ginnt auf Seite 20. 
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opprogramm 



aussuchen una in iL: CK ali Tiwliilini; iibdrueki 
Der AuU>rdkso> Pri^ramm- ediall drum als H..r 
rarlOOO.-DM. 

Mitmiiehcii ki'rncn .ilk. l-'roaramaiicr^i irit t 
Ceioten Atari. Sinclair una II WIA. Ein Li=i 

PnisT-.irnms iirtch keinen Drucker rial. Werden P 
gramme abgedruckb die nielil turn Topprograrj 



" einverstanden (siehe 

Bei orai kann man Geld 
den Abdmck . oder ear 
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CLUBNACHRICHTEN 



Sinclair /X bpecfrurn. 



MI>4rJ; 0'444cr4s4cuf / 



Kontakt gesucht 



Wer sucht noch alte 
CK-Hefte? 



KI Jit M6slichLiul.dk mi 



MIDI-SchnittsrcIL' Dii'«:: is 



Be ste Use he in fur CK-Hefte 
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;fttci)raar-Miii7:(!..'iimM'l 
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^imzlairr < 



Hallo Freunde The Trap Door 



"Grafiktips fur 
den Spectrum'' 
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SPECTRUM 




Nexus 






Die HiiHCtgruTidsincy klingl na 
SligerReponeT- Bines Tamper 



,0 SPECTRUM 



Computer KOMI 



Footballer of the Year 



.' icn h^l Symin ' Spittrur 



The Ice Temple 
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Impossaball 




SPECTRUM* KtKK *SPECTRUM 



lU-Uanncr amnion flip Unite 



ngen (V-S 

INDIVIDUAL 
SOFTWARE 
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SPECTRUM , 3 



The Colt - 
Ein Basic-Compiler 



Die Hackerbibel 



;, I 



Der Kleine mitder RIESENLEISTUNG: 
SUPER CLP 




Losung fur Saboteur „«,»«„ .,„ 

• NUR DM498.- 
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ComautprKcm^kte-..'..Si 



Unsterblichkeits-Pokes 
fiir Spectrum-Spiele 






. simU'isif .BL'Koriac IV-i Linn ,JJ ' l ]j^"'; c ^V'''"h B Xi J" , '" m:l1 »™n der Spicier tin 34509.0], "Wl 
lilk:.livit.ii,i'|-,,.ir-,rrn-v v ,. ". ^ -^ f ^ ^ ' R ,.^_ , c , ; , ,.._.,. |c . 7 „,„ e :„ s i,..,.,,,,. (POKE M "- 



iiiii;K:rVI] vi 






IT Eleich das ersee Byte 






le- Aul'eil^ HLLSL^U^l 



Spcichc. nod, einma! 



SPECTRUM is 



Fischertechnik Interface 
fur ZX Spectrum 





10 da8 sich die Mflglidi 



MULTICARD 1.1 

— EPROM-PROGRAMMIERGERAFT 

— EPROM-KARTE 

— 16 BIT EIN/AUSGABE-PORT 

KOMPLETTPREIS HUH IG9.00 DM «_• 





16 SPECTRU M Computer Kontakl 6-7/87 






Mtni.l. iiiJ.iii 


„.....„.„> ..™., 




H"SmWM8 sv 




1518 PHIKT AT It,*:" VIIIFI 




»" PSim AT ll,.,"».rH, ..... 




Is: Sf? L -^™.-, « 




r^ix =r"-"™"" »* 


Basic-Listing 


,5ee WBtt « m^s.*j»jj ^ (] 


1, HH BRCTOU. ,6,5 j„ £«*Kt *4 




"\, KM : P>I»T "."PI.- Jru, I,,., ™ c-, TO .: COPY : HETT <■ 


if^sSs lllpllv— 


»i'LS°,n-J""(i™ SHU-?* 


,»9 MK^la,™™ 




i||j™r™*" 


Packer & Extender fur 
den ZX Spectrum 


|||jfr '"'"*' 


liPiHI; ^%."' 
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SPECTRUM 17 



Basic-Listing 



Biberacher Strasse 20 
6927 BR-Bonfeld 
Tel: 07066/8562 
2 REM 

5 REM PACKER 

6 REM 

19 DATA 337,75,252,255,237,67, 
346 , 355 , 17 , 59 , 42 , 123 , 237 , 177 , 126 
,186,49,53,126,177 

20 DATA 32,245,237,83,350,355, 
12,254,255,34,218,255,42,346,255 

1,0,0,126,35 

39 DATA 199,40,3,3,24,248,197, 
!29 , 6 , 4 , 35 , 190 ,32,6,16, 259 ,225,1 



77,49,36,34,12,43,254,255,237. 



210 DATA 84,93,1,6,0,9,237,75,2 
52 , 255 ,237,176,43,254,255,237, 91 
,246,355,35 

229 DATA 43,34,244,355,225,94,3 
5,86,339,42,248,255,167,237,82,4 
0,18,43.246,255 

230 DATA 43, 124, 181, 40, 5,34, 246 
,255,24,230,225,201,225,24,48,22 
5,43,229,35,35 

240 DATA 94,35,86,35,126,35,329 
, 42 , 246, 255, 167 , 237 , 82 , 34,246 , 25 



9,229,42,246.255,167,337,66,56,7 
6,49,74,34,246 

69 DATA 255,225,34,248,255,42, 
148,255,1,0,9,126.35,3,199,40,25 
L, 229,42, 246 

79 DATA 255,167,237,66,48,7,23 



7,7 5,246,255,3 



29,237,91,250 

89 DATA 255 

114,35,113,35 



48,255,193,209 

90 DATA 120, 

1,169,235,43,2 



,237,91,246,25 
100 DATA 25,2 
167,237,82,68 



0,0,34,246,255,2 



35,197,3,237 
110 DATA 184,42,254,255,237,91, 
115,35,114,35,237,91,252 



,255,115,35,114,35 

120 DATA 209,235,1,7,0,9,235,11 
5,35,114,291 

130 CLEAR 29999: LET c=31132: F 
OR a-30000 TO 30230: READ b: LET 

c-c-b: POKE a,b: HEXT a 

149 IF c THEN PRINT "Data Erro 
r in 10-120 1" 



10 DATA 42,254,255,229,229,17, 
248,255,1,6,0,237,176,42,250,255 
,34,246,255,225 



5,40,230,42,244 

250 DATA 355,167,237,82,17,5,9, 
35,209,239,167,237,82,68,77,3,22 
5,337,91,344 

260 DATA 255,237,184,221,225,22 
1,70,3.221,78,2,221,229,225,84,9 
3,19,119,11,237 

276 DATA 176,35,237,91,246,255, 
122,179.200,229,24,148,122.179,2 
00,229,24.148 

280 LET c=22651: FOR a=31099 TO 

31157: READ b: LET c-c-b: POKE 
a.b: NEXT a 

299 IF c THEN PRINT "Data Erro 
X in 290-279 1" 

300 PRINT "Data OK. - Abspeiche 
rn:" ,, "l. SAVE n, 'packer""CODE 30 
000.235"' '"2. SAVE ""extender" "C 
ODE 31000,160" 

310 PRINT '"Die beiden MC-Progr 
amine koennen an jeder bellebigen 
Stelle im spaieher aufgerufen 
warden, Hann sie vorner mit LOAD 
""""CODE Jcxxxxgelader. wurden." 
320 PRINT '"Fuer Packer sind fo 

lgande Pokes notwendig: POKE 

65534, LOWBYTE : Code-"'"POKE 
65535 , HIGHBYTE ! start" 
330 PRIST "POKE 65532, LOWBYTE 
: Code-"'"POKE 65533, HIGHBYTE 
: laenge" 

340 PRINT ' "Fuer Extender genue 
0t das Poken des Startes in 6553 
4 und 65535." 

350 PRINT '"Dor Aufruf des jet.e 
iligen Pro- grammes erfolgt dur 

. xxxx 1st die Ladeadresse des 
Programmes {jetzt 300O9 bzv. 3 
19001 ." 

360 PRINT '"Der komprimierte Co 
de beginnt bei Start. Seine La 
enge erfaehrtman durch" ' "PRINT P 
EEK (start+41+256'PEEK (start+5) 
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Boulder pro 
Dash 






Boulder pro Dash: Erst tippen, clann tiifteln 




Tel. 81144/12373 • 
Dura-all Srftnare « 



75 if mm-"a~ i 



TO IF III 63*86=175 SND IK 6143 
*■!» TJB» (C TO 2» 
95 IT DC 61438=186 TTOI 8370 
135 
188 IP IS 61«&<82 IffiM SO TO 

3« 

1b-1: U5T ti=3»: Ul dirf: GO 
TO 315 
115 l£T 3-BW (BW1») 

128 n mtr ai.y+iw no *s 

125 IT ATTH (h,y-l)=67 AND ** 
138 U ATTS OiH.yW AND *3 
135 n MM (h-l,y]=Sl MB *4 



I LET s=j-l: PCI 



trlO TUB! PHOT AT 21,18; UK 2 

!" "i lzi'ti=3Ms Ot Hjf9: fl* 
a=*TO25: BEEP .1,3: NDTTa: G 
Old 314 

17* IF Am (A,B-1)*128 IBBV L 



F (a.b-l)=«7 CB m 



195 PT ATTB (a,trH)=4« AMD ATTR 
(a,b«>=W THEM PR2T AT a.btl 
; DE B; PfflB »;" ";ffT »,W2; P 



Die unlerstriclienen 
Buchstaben milsscn im 
"G" (Graphics )-Modus 

eingcgcben werden! 



248 IT STTB (A-1,B)=128 THQI L 
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u Pttciwi: raar w 7; 



i; mrassE l; man 



28» IT ATI* ia+l,b).*7 OR ATO 
(»l,b)^8 DM 03 TO 55 

285 if am (*n,w«« raw u 



PAPf* »; D« 8; HEIGHT 1;" ": L 
ET fc*U: H0HT AT A,8; DC 1; P 
APBt »; BRKMT 1}1Q» 

295 0JTO5S 

398 IT ATO (*tl,M=48 Affl ATTfi 

(a*2,b).*4 HDM [K3fr IT a+l,b 
; DK 9; papbi 8;" ";*T a+2,b; p 

wra 5; uk s; invtoss i; auisr 



316 If ovtf 1H 
N IHlB^leU 



Die unterslrkhcnei] 
Bucbslaben milssen im 
"G" (Grdphics)-Modus 



325 KB *0 TO 28: PHUT AT a,l 

.■: . .. . i. .. 



HT (HND-Jl) : IT ft-21 OB B*31 1 
M GOTO3W 
345 IT A<3 THBI LET M*3 



K 9; PAFBt 5; BRIGHT 9;V 
DM 
378 UB A=nir |END*21): ] 



3«* it bti n 

A,B>=4« THW 



IT 9,0; INK 7; DHER5 



IBer: zur Verfusgmg SI 
intai unterdsr Ert 
Bam Sie si=h aha; an 
in Sen Kopf anKMao 



S5 PRIST AT 29,5;"Druecta! 
ate": PAUSE 4-4 
19 PRIM AT 5,i;"Ste mis 
■ aufpassai.iaci es ist e 
5ba In der HbaMsdie staendiij 

b wratdudrt. to* "hb 

Ie fs bestijmt alls Dia 



8 dneA-Aeu stunt ve 



H Tjste": PMISE Ml GO TO 25 

S5 rat tm TO 55: RBE b: Pun 

a "a'W.b: lECT a 

M SUA 24 .36, 126, IB, 126 .36. 2 

I 

« DATA 114,172,13,234,35,218, 

» DATA 9, 68, 11B, 122,122, 118, 6 

» DU1 56, 61, 49, 16. 124, 146,56 

10 DM7. 17», 255,178, 255, 179, 25 
178,255 

15 DVm 231,231,129,129,231,23 

M DAIS 195,255,126.126,126,12 
155, 1» 

16 SAVE "(so Basil" DIM 465: V 
TT"|toM" 
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Automarkt f^ 



tMHDl 

2 BEAD A 

3 porausi 



'■"^ 



5 DATA 855,178,255,178,255,17 
8,255,178 

98 LET te^JOWO'. LET rep* L 
ET aoz-«: KNa(20,6): LET auf=8 
: LET werbwH: LET nietff*: IE 
T tag»l: I*T «a-l: LET JatpS7 

188 BORDER 8: PAPHt 7: DK 1: B 
RIGHT 1: CL£ 

118 PRINT PAPS 6;AT 1,7;"A U 
TO HAIir 

128 LET x=4: LET y^fl: LET a£="H 
ie haLssen Sie?"; GO SB 8908: L 
BT i-5- LET y-S; LET aS="(Vor-un 
d I ill" 03 SUB S988 

126 IHW a$ 

138 FOB i'l TO LEW IS 

135 IF a$ii ID i)=" ■ THEM 1ET 

vS=aS( TO i-1): LET zS=»S[i+l T 



155 LET *=12: LET i=L: LET a$=" 
Sie tuben ein Startkapital 
vhi 38888 DK. Hit dieses Kap- 
ital koemea Sie Iteiuai Ge~ 
brauditwaoenhfliidel eroeffnen. 

Krcdit aufaetoen.": GO SUB S9W 

168 FOR z=l TO 840: NEXT I 
» SUB 170: «C TO 288 




285 INPUT b 

218 If b<l OR b>106808 TBEH GO 

10 206 

228 LET z±nse»= ( (**3aj *b*S) / (36 



225 LET 2 

238 LET jpU): LET j=8: LET a$^' 
Sie zablen "; LET a>aS+STRS sin 
sen: LET a$=a$+" DM Hnsm.": GO 

SUB 8309 

235 LET rate-(b7zinsai)/a: LET 

248 LET Fl2: 1ET v=8: LEI sS=" 
Thr u iKTiatliche Bate beCracgt: 
"■ LET aS=aS+sne rate: LET a5=a 
S+" DM-": GO SUB 8989 

245 LET <wer-2Wa*(b/iroO»): IE 



r=IHTOT 

LET k=15: LETy= 



178 8! 
RIGHT 1: 0£ 

188 1ET irt: LET r=8: LET aS^'S 
ehr geehrter Heir ": LET a$=aS+i 
S: LET aS=a$+"!": GO SUE 8990 

m LET y*9; LET ji-2: LET aS="U 
eher nieviel Haat e aneehten S 
ie den Kiedit (Maximal 12 Mm- a 
te] 1": GO SUB 89» 



268 LET x=19: LET y*8: LET aS=" 
Hit freundlirben Gruessen": GO S 
LB 8908: LET 1=21: LET y=6: LET 
aS-"SinCUir Bank": GO SUB 8909 

264 LET kredit*b+zins«i 

265 LET kap=kaj>tb 

266 LET laul=a 

278 FOB z-1 TO 888: NEXT z 

276 RETURN 

288 BRIGHT 8: BORDER 8: PAPER 6 



296 PRINT AT 9,19;" KRED] 

388 PRINT AT 11,18;" HEM 

3*5 PRINT AT 13,1*:" TCH 

386 PRINT ll;AT 1,8; HE 7; 

- bestaetigan 9" 

tt8I£Ts*7 

311 FRUIT OVER 1; HASH 1; 



3181 
38 

328 GO TO 311 

338 IF x-13 AND ajete=9 THEN G 
OT0 3U 

335 IF x=9 At© ktedit)8 THEN G 
TO 311 

336 IF jpil AND HKbungiS THEM 
GO TO 311 

338 IF j=7 AW auf-1 THffl GO T 
311 

348 33? XOll THEN GO TO 488 

350 OS 

36(1 PRINT AT M;"HERBUNG": FM 
NT OVB 1;AT 0,8;" " 

378 PRINT AT 2,«;"Sie koemien b 
is 2U 18808 DM fta-bung maclje 

388 PRINT AT S,8;"Kieviel DK Ie 

, 338 PRINT AT 8,8;"Ihr Kapital b 



398 03 TO 288 


635 PHUT AT 5,«;"»HHHS ";wer 


a68UTif(4)=w(4)-l»(3)/5e) 


4*0 IF x<>7 THEN 03 TO SBC 


buns?" IM" 


361 LET v(4)=WT »(4) 


4*5 REMHJJflffl 


636 UT steskap/MfSi LH ste= 


862 LET peBl+TOT (RHC4! : LET p 


418 LfcT auf-1: DIK d(5,3): OS 


WTste 


cspo*18: UT po=188-Jx> 


428 for j-itos 


637 IF ste(8 THEN LET ste=8 


865 LET H(5)=*(4)/18B*po: LET V 


425 LIT dtz.ll^MNT (RND-15) : 


639 PHOT AT 6,8; H STHJER ";ste 


f5)=Dn? «(5I 


LET d(z,2>-IMT <BMD*2): LET dli, 


;*' ar ' 


866 IF w(S><588 THEH L£Tw(51 = 


3W<z,ll*(88+IKT (USD**) 


645 PRINT AT 7,8;"K.RATE ";rat 


588 


426 IP d(i,2>-l TEfM UT dlz,3 


e,- DM" 


876 PHOT FLASH 1;AT 7,8;(q);" 


W(J,3HJ« 


658 UT ge3=steirate(nerlmns«»i 


. AUTO" 


42SNBITZ 




E88 PHOT AT 9,6;*$;", BJ ";w(2 


430 PRINT AT e.ej'MBJME KLETES 


668 PRIOT AT 8,8?" 


)?", KB -MD 


": PRINT OVER 1;AT Ml" 


678 PHOT AT 9,8;"GESSnT ";ses 


898 PHOT AT ll,8;"Al»TKMSPI!in 


" 


-."OF 


S ";*15l;" DW':AT 13 J 8:"»BUPBEIS 

";■;" DM" 


448 FC* z=l TO 3 




458 PRINT ' 


632 LIT kap4ap-sea 


B95 FOR z=l TO 388: HGXT z 


468 FKUrr [z);".Stellplati ";d( 


685 PRINT AT 13,B;"KAPrTAL ";ka 


988 PHMT PAPH! 2; DK 7; FLAS 




K" DM" 


H 1;AT 21,8;" EP BnTEM, IH8HT 


465 IT d(z,2)=l THEM PBJOT " 


698 PHOT AT 16,8;"STELLPLAETZE 


ER, E^ EWE " 


Berkstatt, Prein ";dlz,3>;" DM." 


"';stall 


985 PHOT AT 19,8;"fapmL ";la 


478 IF da, 21=0 THHI PRINT " 


788 PHOT AT 17,8; "MHOS 


p;" DH" 


Praia ";d(z,3);"Iti" 




911 BORDRR 6: LET ibfI: PHOT A 


430 1437 z 


718 PHOT AT 19,8;1SEDIT ";hre 


T 15,13:"aao^ , : FOR z-1 TO 88: 


498 PRINT AT 17, 8; "6. Seines die 


dit;" DH" 






728 PHOT AT 19,8;'TJiUFZEn ";1 


UT n(5>=»(5)H88: PHOT AT 11,1 


588DIPOT a 


mi ;" Haute" 


4;" "jlTll.UjwH;" DM 


419 7J *=« OB a>6 THH) GO TO 5 


725 PHUT AT 28,8;"UEBBtZ. ";ov 




N 


er;" DM" 


912 BORDER 6: PAUSE 78 


415 IF F6 AND mieta-8 THEN 03 


738 IF ltuf<=« THEN UT twrf 


913 LEI aS=DKEY$ 


tew 


: UT toeiit-fl: UT rate-0 


915 IT aS-D" AH) anz+l>stall T 


528 37 a=6 TEfM Q3TO286 


758 IF tep<orer-OBiei«2 THEN Ht 


HEM PHOT AT 18, S; "SIE EABEM SE 


515 IF aa>dla,l) THBI FAINT A 


IMT PJtFHt 2; DK 7; BRIGHT 8;AT 


1MB) STELUUTZ HEBR": FOR 7=1 T 


T 21,0;"Sie nabai BGbr Autos!": 


2,22; "SIE SJHTiAT 4,23;"FUTTE 


288: IflBCT z: CO TO 1888 


FOS z=l TO IM: NEXT z: PRINT AT 


";AT 4,23: OTEfi 1;" , „ ■( FOR 


928 IF aS-"b" TKEH LET ™f2: P 


»,•;" ": 


x»l TO 1888: IDT z: 03 TO 5888 


HOT AT 16,18r"SIE 6161™": FOR 


GO TO 500 


768 FOR z-1 TO 1888: NEXT z 


z=l TO 88: NEW z: PRUT AT 16,1 


438 LET materia, 3) : LBT stall 


MRfflAUKTKM 


8;" ": UT h(5>=»(5I+18 


■dfa.ll: LET vetk=d(a,2) 


885 FOR T-l TO 18 


8: PSDir AT 11,14;" ";AT 


548 GO TO m 


886 LBt art 


ll,H;ir(5);" OT 


558 MM KRED3T 

568 IF K>9 THEN 93 TO 686 

478 GO SB 173: 03 TO 286 

688 7W MHATSEHDE 

618 UT laiMaif-l: UT auf=8: 


818 BORDER 8: PAPER 7: INK 0: C 

u 

B15 MS z=8 TO 4: WW! PAPER 
3:«T i.«;" 


925 UT ha-l+DT (MID-1®) 

926 IF ha)9 AND m>8 TBEN PKDi 
T AT 17,5;"DE8 RV WDH VERKAUFT 
": FOR z-1 TO 188: NEXT z 

927 IF ba>9 AN) uf2 THEH GO T 


HEIGHT 0: BORHS 2: PAPER 2: IN 

K7: CLS 


li. ■ i": NOTi 
828 PHOT PAPER 2: D8C 7;AT 2, 


929 IF ha>9 AN) no-1 THEM GO T 


611 PAPHS 7: BRIGHT 1: ffltt 8 


ler'Aun r i cr 


0998 


612 IF lauf<6 THEN UT laufc* 


831 DIM h(6) 


938 IF nS^V TRIM GO TO 998 


615 EOt Trt TO 21: PHOT AT z,6 


834 LBt u=(i+DfT IRN>*65)) 


948 W aj-"a" TREM GO TO 995 


;" ": NEXT z 


836 RESTORE 9886*1 


943 LET art 


628 PHOT AT 8,8;"HAT<li "(tW 


348 REW>*$,k 


949 03 TO 918 


."aeif.-fia 


845 LET wfl)=u: UT w[2)=jab-(l 


978 LET tan=kap-*l5) 


621 PUT 8,168: DRW 158,8 


+IOT <RND*15)>: LET »<3)=1888+IN 


971 LEI rep=iee+JOT (M«8») 


625 EHOT AT 2,»;TfflPITAL ";]cap 


T (RND*99868) 


972 IF oerlpl TBM UT rep=rep 




343 LET «(4!=" 


12; LEI rapIOT rsp 


638 PHUT AT 4,8;"fiBTE ";Bie 


858 LEr*{4)=*(4)-n/ieB*<5*l3ah 


975 PHOT AT 28,6; ,, REPARaTI»t "; 


te;" UT 


-"(2)1) 


rsp; 



976 LET v«)-»{5)-4Tep 


3929 LET »n>l+HJT (RND*159) 


« 


977 FOR. z=l TO 299: NOT i 


3921 IF ote* THEH GO TO 3939 


3495 IF 1S( TO 3><>w$< TO 3} HE 


969 LET anzsaoz+1: IBT alanz.l) 


3925 IF zuf<-*ertuncj/199*39 THEN 


H PRINT fl;AT M;"Diese l*srl« 


=u: 1£T alaaz,2)=»(2) : I£T a {am 




wlltE ioh nichti": FOR z-1 TO 1 


,3>=*(3): LET a(am,6)*w(4): lzr 


3939 PRINT AT 19,4;" SB BABEN K 


59: NOT z: GO TO 3385 


a (am, 5) ■■(5) 


EDS KLWDBiL ": FOR z=l TO 199: 


3419 LF lS=w$ TffiK PRINT ll;AT 


999MOT q 




9,9;" Icb icedite eine TesHahr 


995 PCS z-17D am: LET alz,4)= 


3949 IF tag=36 THEN IZT warburg 


t!": FOR z-1 TO 159: NEXT z: LET 


8: NEXT! 


=8: GOT0 2S8 


zu-lt-INT (JMD«14) : GO TO 3379 


IDX BORDER 7: PAPER 7: IK 9: C 


3945 GOTO 2999 


3429 LF 1$( TO 3)-w$< TO 3) THEN 


L£ 


3199 RE) VERKAUT 


PRINT ll;AT 9,9;" Icb iKechte 


1919 PRINT PAPER 6; DK 9;"NR." 


3195 LET Sh°gfaU 


edne Testfahrt!": FOR z^l TO 15 


; PAPES St'HKXE "; PAPK 


3109 PRINT Mira 6; IK 9,-'HR." 


9: NEtT z: LET zu-l+INT (RNI-12) 


R 4;"BJ"; PAPHI 3;T9T; PAPHI 2; 


; PAPER 5;'7aRKE ■; PAPE 


i GO TO 3379 


"PEK1S"; PAPER 9; TREES" 




3421 STOP 


1B15 PLOT 6,168: DRAW mt 9; OV 


"PREIS"; PAPK 6;'TREIS" 


3599 LET ui-l+LNT (RND-1B) 


HI 1(255,9 


3115 PLOT 9,168: KAU UK 9; DV 


3591 DT a(ang,4)>a(aBg,6)/199-ll 


1828 FOR 1=1 TO am 


ES 1;247,9 


9 OR ui>a THEN GO TO 3593 


1925 RESTORE 9886+a{z,l) : REM) h 


3129 FCR z-1 TO am 


3592 GO TO 3599 




3139 RESTORE 9699*a(z,l): READ v 


3593 PRINT ll;AT 9,9;" Der Va 


1939 LET op-INT l(z,)l/im 




dm iat zu Teuac! ": PRINT #1;A 


1940 PRINT PAPER 6; IK 9;fel;" 


3149 LET op=INT a(z,3)/1999 


T 1,9;"* nieviel DH aeben Sie r 


.'TTAB 3; PAPHI 5;»S;TJIB 17; PAF 


5159 PRINT PAPER 6: INK 9; {?.);" 


inter!": FOR z=l TO 289: KIT z 


HI 4;a(z.2);TW> 19; PAPHI 3; INT 


.";TAB 3; PAPER 6;*S;TAB 17; pjp 


3594 UffttT "Preia? ";)[1 


op;TAB 21; PAPHI 2;a(z,4) ;TM 26 


Ht 4;atz,2);TAB 19; PAPER 3;tNT 


3595 LET ui=l+DIT (RND*19) 


; PAPHI 9;a(z,5);TAB 31; PAPHI 7 


op; TAB 21; PAPER 2;alz,4i:TAB 26 


3596 IT tl>alan B ,6)/lB9*119 CR u 


1959 IF a{z,4)=8 THBI PRINT AT 


; PAPES 9;a(z,5};TAB 31; PAPER 7 


i>8 TEEN PRINT |1;AT 9,9;'T»r W 


21,9;"wert as nans ";a(z,e);" 


3169 NEXT z 


ageo ist Ibex uxh zu";AT 1,9:" 


DH": INPOT ■■VaraUTSFKEIS? ";« 


3179 LET zuf-1+IHT (RND*2) 


zu Teuer!": FOR z=l TO 158: NEH 


r: LET atz,4)=rer: CO TO UN 


3189 1? zuM THEH LET vor-1988 


z: GO TO 3385 


186«NOTz 


•ll+INT (RND*49)): PRINT *1;AT 9 


3597 LETa(am,4)=ia 


1979 FOR j=l TO 408: KIT z 


,0: "Idi cache can Auto in die 


3589 PRINT #1; FLASH 1; PAPER 2; 


2988 REM SPIH, 


";m;" Mi": GO TO 3399 


EK 7; BRIOTT 1;ST 9,6;" Die 


2995 LET ij=MHT tRNL»49> 


3199 IF zuf=2 TEH) LET j=l+INT 


sen Vagal kaufe icb! ": Pat 


2998 IF ij J3S THEN CD SUB 4999 


<RHD*65): RESTORE 9999+j: READ 1 


z=l TO 298: NEtT z 


2919 BRIGHT 8: KSms 2: PAPER 2 


S: PKOfT tl;AT 9.9; "Idi sucbe ei 


3519 PRINT #1; FLASH 9; BRIGHT 9 


: IK 7: OB 


nen ";1$: GO TO 3399 


;AT 9,9;" 


2911 LET tag=tae*l 


3399 FCR z-1 TO 159: NOT z 




2912 IF tao=? 1 THEN LET no-ax 


3395 INPUT "frfflm ANGEBOT ";am 


3529 LET tap=tap<a(aBg,4) 


Mi let tag=L 


3396 IF ang=9 THEH GO TO 3999 


3538 LF ang=ajii THEH LET ajiz=an 


2913 IF kbfU THEN LET jab-jab 


3319 IF anz<ang THEH GO TO 3395 


z-1: LET a(aua,l)=»: LET a(ans,2 


+1: LET rco-1 


3315 IF zufoi TBEH GO TO 3499 


)-9: LET a(aoo-3)=5: LET alang,4 


2929 PRINT AT 8,9;"I*nB ";tag;" 


3329IFa(an(j,4)>TOr TDHI GOTO 


)-«: LETa(ans,5)^: LET a(ang,6 


."pmr.'ij* 




)-9: GO TO 3999 


2939 PRINT AT 19,7:T01PITAI, ";tai 


3339 IF a(am,4X«a:A99*99 THEN 


3549 LET d(sng,l)=a(anz r ll : LET 


p;" DP 


GO TO 3389 


a(ana,2)=a(anz,2): LETs(ang,3)= 


2949 PRINT AT 15,«;"0= QEFFNEH 


3349 PRINT ll;AT 9,9;" Idi bk 


a(anz,31: LET a(aUH,4}=a(anz,4): 


s= auction" 


hte eine Tesllahrtl" 


LET a(ano,5)-a(aiH,5] : LET a<au 


2959 MFW aS 


3359 FOR z-1 TO 159: NEST z 


g,6W(am,61 


2955 IT a$OV AND a$(>V TUB! 


3369 1ST zu-l+Uir (Rt©*19) 


3545 LET a(anz,l)=«: LET a{anz,2 


GOTO2958 


3379 U zu>5 THBJ GO TO 3599 




2969 IF aS="»" AMI tag<39 7901 


3389 GO SUB 3699 


)=8: LET a[anz,5)-9: LET a(anz,6 


GOTO B98 


3385 PRINT 11; AT 9,9;" 




2979 LET gb=6 




3559 LET anz=anz-l: GO TO 3999 


3999 REM 




3699 LET dhk=l+JNT (RNDM) 


3919 ECSMR 7: PAPER 7: INK 9: C 


3399 GO TO 3999 


3685 GO TO 3699tdhk*19 




3499 RESTORE 99994a(3na,l) : READ 


3619 PRINT ll;AT 9,B;"Diese Post 



ti jxfan i, 



■ rarbs 



idtt!" 

3611 SO TO 3650 

3628 FRSrr ll;AT 8, 

jeiaellt mir mdit! 

3621 CO TO 3650 

3630 PRDfr ll;AT 8,0;'Ter Ha ha 

t suwaiig Kcmian! " 



3631 a 



D 365ft 



3610 FREW il;AT O.Oj'TJer s 
■ fuerchterlicli aus!" 
3650 FOR z4 TO 139: NEXT z 



4010 1£T cs=l+2(r (RND*4( 

4015 iet sPitmr (BWM99S) 

I PRUfr AT 7,0;"SIE HABEN Pi 



HC T;AT 18,22;"1DCB EDT;AT 12,2 

5810 PAUSE 

5020 IF DBEYS^'j" 1HEH OH 

5830 SOT 

8908 RIM SOTUFTAUSGABE 

8918 FOR i=4 TO W aS 

8928 PRDlr « *,yraS(i); UK 2;" 



8940 I£T jfw(sHJ) 



': PRIM 
izahlenl": FOB z=l TO 308: 
;: [ET tap=kap-flt: RETURN 
• cip2 THEM PRWI ""SLe 
erhaltHi eine Steuerruecker-stat 
";gt;" DM": FOR z=l TO 
z: 1£T )ap*ap-gt: RE 

4858 IF cm3 THEN PRDfT ""Eie 
in itar lotterle": HUHT gt 
gewjmai!"- FOR i=l TO 388 

z: I£T liap-lHptgt: RETURN 

4868 IF co-4 THEN PRINT ""Sie 
saai ";gT.;" Of fuar Iter-": PR 
' "siehsnmgen bezahisi!": FOR 



1 BRICOT 0; PAPER 2: 1 



9000 REM DATA 

9881 MTA "Audi 100", 25088 

9882 MTA "Audi 88", 15888 
9803 DATA "Audi Came", 38888 
9884 DATA "Ami 58", 12808 
9805 DATS "BMK 635", 40000 
9886 EKIA "BMK 323", 25808 

9807 DATA "SW 316", 20808 

9808 DATA "Citroen IMS", 15888 

9809 DATA "Citroen Visa", 12888 

9810 DATA "Oatsim 280", 16880 
9011 DATA "Datsm 188", 13808 
9812 DATA "Flat 580", 11080 

9013 DATA "Fiat 126", 18088 

9014 DATA "Escort Tunier", 16888 

9815 DATA "Escort OS", 15808 

9816 DATA "Capri 1.6", 18080 
9017 DATA "Capri 2.8",22888 



8 DATA "< 



la l/',m 



9019 DATA "Sierra 2. 8" ,23000 
9028 DATA "Fiesta", 13080 
9821 DMA Taurau", 15000 
9022 MTA "aonda Civic", 11880 
9823 DAtA "Honda CRT', 18888 
9024 DATA "Jaguar XJ", 58888 



!6 DATA "Mercedes 198 D", 35888 
17 DATA "Mercedes 288 D", 48808 
!8 DATA "Mercedes 238 E", 33888 
!9 DATA 'Mercedes 288 E", 28888 
V DATA "Mercedes 248 E", 24888 

11 DATATtadett C", 13883 

12 OATS "Kadett D", 14888 

13 DATA "Kadett J", 15888 

14 DATA -Retard E", 18808 



9841 DATA "Sata Gl 



9843 DATA "Porsche 9; 



9868 DATA 

9861 MTA 

9862 DATA 



tie 911", 35088 
"Renault 4", 15888 
"Renault 5", 17888 
"Renault Fuego",lE888 
■■Coll Cabrio", 22888 
"Colt L", 17888 
"Coll GIT", 25888 
Of ,19888 
"Polo L", 15888 
"Passat Variant", 28080 
•Passat L", 16000 
'Srdrocco CTX", 38008 



"W Kaeter", 10880 
348", 22888 
244", 21080 
'Volvo 764", 45000 
"Datwo L", 17800 
'Sdrroco L", 20000 
'Ttercedes 288", 23888 
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3 cassetten kosten 30.- dm Sinclair-Cassetten 

5CaSSettenkOSten40.- DM A Ticket loRklo Msnlsunnar 

on K!T d,r EfllSj 

10 Cassetten kosten HU." DM IKU™ r^H?™ Fractals 

1 1 ft Cla-s Df oispalr Rasputin 

15 Cassetten kosten I III." DM code™™ m«b £#21, - 

^ f f| Combat Lynx Sa-kaa-Dl Assiali 

20 Cassetten kosten lllli" DM i^icwanoad sISTjSZ 

- _ j. Equrns! Space Wa "j^ 

25 Cassetten kosten 1/U." DM 1^ SSSSi 

30 Cassetten kosten IOU«" DM Ef^" 6 ¥^ZT * 

ion . :™ asl ssr* 

35 Cassetten kosten IHUi DM ££££: *. « 

40 Cassetten kosten faUUi" DM E! ™ 7 ae88 SSs&S*. 

Wirvom 
Diabolo-Versand, 

AuBerdem: 

Bomb Jack II DM bUi«IU 

[Airwolf, Commando, 9Q Qfl 

Frank Bruno, Bornbjack DMfaUiwU 

Lightforce DMfc^fi - 

Marble Madness DM fc"t i5JU 

taper Boy DM £Hr* 

Scooby Doo DM bWi«IU 



...schnilren Ihnen ein Oberraschungspaket, daB die Ohren wackeln, Alles 
Originalspiele in Origmalverpackung. Nur die Praise sind von una! Bittegaban 
Sie aul dem Beslellschein nur an, wie viele Spiele Sie haben woilen. Keina 
i Titel - den Rest machen wir. Die totale Ubeiraachung, die last nichte kostet! 
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SPECTRUM 



Basic-Programme per 
DFIJ iibertragen 



■vpiN-"hL Si'i-i-i iui 



BASIC-/ASCII-Wandler 



COMPUTER KONTAKT 19B7 



:16*FN A(X*U 



IX*> , 9"1 

16 DCF FN ] 
■ FN AfXS12) 1 
20 LET A- 649 90 

30 PRINT -Einslsllung tier Para 
letor", "flier das RAM-Listing 
J N* 

I 255,0 



GO TO/ SUB 
LET unter 
fcein GOTO 
LN -> LOG 
CODE -> A 



60 PRINT : 


PRINT " 


-> GOTO/GOSUB" 


70 PRINT : 


PRINT " 






90 PRINT : 


PRINT ■ 


nach THEN" 




90 PRINT : 


PRINT " 


100 PRINT : 


PRINT ■ 


SC" 




110 PRINT : 


PRINT ■ 


?" 




120 PRINT : 


PRINT ■ 


130 PRINT : 


PRINT ■ 






140 PRINT : 


PRINT " 


..Z" 




143 PRINT : 


PRINT " 


150 FOR I=: 


TO 9 


160 LET A*= 


■ X "11* 


I) TO ) 




170 PRINT AT 1*1*1, 


1*1*1, 31;A* 


2) 



X beendef 
SGN PEEK (A- 
29;A$(l)iAT 



160 NEXT I 

190 LET I*=INKEY« 

200 IF I*-" THEN BO TO 1 

205 IF !*-■)(■ OR I*="X P 1 



SPECTRUM 



210 IF I*<"1" OR I«>"0" THEN SO 

TO 190 

220 LET I=A+VAL I* 

230 POKE I, (PEEK IOII-1 

240 00 TO 150 

300 CLS 

310 PRINT "Das Basic -Program* a 
ar* jetzt gelaescht bin. ueber 
laden', 'Marden.' 

320 PRINT 'Nach NEW 1st Neuinit 
ialisierung durth RANDOMIZE USR 
65000', -nQtuendig. ■ 

330 PRINT : PRINT -RAH-Listing 
vorbereiten durth CLEAR Slarta 
dresse-1" 'RANDOMIZE Startadress 

340 PRINT : PRINT 'Durch*uehrun 
gi LIST ttl0* 

350 PRINT : PRINT "Anschl iessen 
d llrtert', 'PRINT PEEK 23*70+256 
*PEEK 23671-Startadr-es5e die La 
■nge des erzeugten Textas." 

360 STOP 
2000 RESTORE : CLEAR 64989 
2005 PRINT "Der Maschinencnde Hi 



:eugt.' 



•RINT 



2010 LET A -64990 

2020 FOR Z-3000 TO 3030 STEP 10 

2030 PRINT 'Zeile "1Z;"! "J 

2040 READ A*: LET 9=0 

2050 IF LEN A*<4 OR LEN AC/20IN 

T (LEN A*/2> THEN QO TO 2190 

2060 FOR 1=1 TO LEN A*-2 STEP 2 

2070 LET X-FN B(A*(I TO I + D) 

2080 LET S=S*X 

2090 POKE A,X: LET A-A+l 

2100 NEXT I 

2110 IF FN B1A*(I TO ))<>S-2S6«I 



NT IS/256J THEN 00 TO 2190 

2120 PRINT -ok' 

2130 NEXT Z 

2140 RANDOMIZE USR 65000 

2150 RUN 

2190 PRINT '+ehlerh»*t ■": STOP 

3000 DATA -00+tft**00ft0000ff002 

a 2a5 c 7 1 b 5c 02 a5 35c e5 2 b 10b00e5c 5 c 

d55 1 6c 1 e 1 1 122* e7323722336c423361 

32336422371237023232371 2370e 1 ed 3 

b4* 5c a7ed 3222 2a5c c 9 2a765c 1 1 d 9-F d e 

d 523802c + 03372 1 d «■+ d e3d d e 1 c b4ec b8 

e c 0f a 20200b c b 7 6 2 8 i 4 a " 

3010 DATA ■cbb6ddct>0146c0cO6e280 

4cba.Bc.b-F 6 fe+ 1280dddcb02462907*dc 

b014fic01620feecZ011CQeeddcb0346Z 

80 9 c b as c b 6 6c b a6 c 0c b e s c b a6 f e e d 200 

2cbee*eb820090127*fddcb0446202*f 

ea-f 20090 1 2c f t d d cb0346202 2 + a + 520 1 

Iddcb0646280b0131-t*c»" 

3020 DATA "f dcb01462B0f 1813teea2 

01 40 1 34f -f d dcb07462B0b0aa7cBc3cd2 

2 f ec 1 03 1 8t 5+ e6 1 380df e7b3009dd cb0 

94 6 28 3f d 6203 7+ e0d 2 807-F e 203003c be 

pc97ad6a5380do5f 5cdl00c+l«l-fe26c 

0c b e6c97 a* e74 38 1 ad d c 0084 628 1 42a7 

65 c 34 5c23 7 a* B90380270 " 

3030 DATA 'd630d61*77233s3cdd2a7 

63c 7723 22765c * d cb0 1 86 * e 20c0* d e b0 

1 c 4c 9 4c 4* 4720004 1 5 3 4 3 2 000 203 + 002 

0212000d4' 

9000 SAVE 'RAM-LIST" LINE 2000 

9010 8 TOP 

9500 SAVE *-m*;lJ'li5f LINE 200 



Spielereien mit dem 
Betriebssystem 



Bildipeidiet eeLiKckt u 



SPECTRUM 
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Tasnord-Files EX 

DFU-tauglich machen i "S " 



■■.■lull' I >>. ■.,■ I, , Inn. I „ l.i ' 



Tasword/DFU-Wandler 



i = PEEK X+ 25 6* PEEK 
'<LEN S 

I DEF FN AIX*>=CODE XS-4B-3P* 
I DEF FN B<X*)=16#FN AIX*(1J) 



3 61+STR* > 



*(2II 

I LET A-29000: LET TXT-* 
3 LET TASLEN =250X64 
J LET MD=i 

S LET TXLEN=USR (A+23) 
J CLS : PRINT ■ Text< 



(-388 



100 PRINT : 



PRINT ■ 
PRINT ■ 



110 PRINT : 
lassette/Micradrl ve' 

120 PRINT : PRINT -3: 
laden 1 

130 PRINT : PRINT "4; 



SPECTRUM 



140 PRINT : PRINT "5 


Graphlkz. 






150 PRINT : PRINT "6 


TasHord ■ 


> DFUe" 




160 PRINT : PRINT "7 




reicher (DFUel " 




170 PRINT : PRINT 'B 








180 PRINT : PRINT -9 


Text dmc 


190 PRINT : PRINT "0 


Text 1ds5 






200 PRINT 80; AT 0,01 


Text laenge 


:*IFN F*fTXLEN)' ■ 




F*(FN D<23732)-TXT-TXLEN) 


210 LET I*=INKEY«: I 








220 IF I«<"0- OR I*> 


9" THEN GO 


TO 210 




230 GO SUB 300*100*1 


\L I» 


240 GO TO 80 




300 IMPUT "Text Mirk 


I let) lnfsch 



THEN 



en (J/N)? 'II* 
310 IF I*<>-J- AND 
RETURN 

320 LET M=INT (TXT/236* 
330 POKE A.TXT-256*M 
340 POKE A+1,M 
350 RANDOMIZE USR IA*4) 
360 RETURN 
400 CLS : PRINT ! 
410 RANDOMIZE USR IA+16) 
420 INPUT -Heitei- nach ENTER!"! 
LINE I* 
430 RETURN 

500 INPUT -Cassette (-> 01 oder 
Microdrive <-> 1..8I? "IMD 
510 IF HD<0 OR MD>8 OR MDOINT 

MS THEN GO TO 500 
520 IF NOT MD THEN RETURN 
330 CLS : CAT MD: GO TO 420 
600 INPUT "LOAD - welcher Name? 
■II* 

610 IF LEN I«>10 THEN GO TO 600 
620 IF MD THEN 00 TO 650 
630 LOAD I* CODE TXTtTXLEN 
640 RETURN 

650 IF !*=-" THEN GO TO 600 
660 LOAD *"n p iMD;I* CODE TXT+TX 

LEN 
670 RETURN 
700 LET T=USR (A+22) 
705 IF NOT T THEN RETURN 
710 LET N=l+tT=l)»INT MTXLEN-1 

1 /TASLEN) 
715 INPUT ■Aufzetchnen unter Me 



Ichem Namen" 



(IS 



I I*>10Z*<N> 

1) THEN GO TO 715 
725 IF N>1 THEN GO TO 750 
730 IF NOT MD THEN SAVE I« CODE 
TXT.TXLEN: RETURN 
735 SAVE #"m*lMDiI» CODE TXT.TX 



m'tMDil* CODE 



750 f 



. TO f 



755 LET L=TASLEN: IF I-N THEN L 

T L=TXLEN-IN-1)*TASLEN 

760 LET ADR=TXT+II-1J*TASLEN 

765 LET N*iI*+-. , tSTR* I 

770 IF NOT MD THEN SAVE N* CODE 

ADR,L: GO TO 785 

775 SAVE *'n"iMDSN* CODE ADR.L 

760 VERIFY *"m";MD;N* CODE 

785 NEXT I 

790 RETURN 

800 RANDOMIZE USR <A*19) 

810 RETURN 

900 RANDOMIZE USR (A+7) 

910 RETURN 

000 RANDOMIZE USR (A+10) 

010 RETURN 

100 RANDOMIZE USR (AU3I 

110 RETURN 

200 LPRINT i 

210 RANDOMIZE USR IA*16) 

220 RETURN 
2000 RESTORE : CLEAR 28999 
2010 LET A=29000 

20Z0 FOR Z=3000 TO 3030 STEP 10 
2030 PRINT -Zeile "iZi": "I 
2040 READ A*: LET 8=0 
2050 IF LEN A*<4 OR LEN A*/ZOIN 
T ILEN A*/2) THEN GO TO 2190 
2060 FOR 1=1 TO LEN A*-2 STEP 2 
2070 LET X^FN B(A*(I TO Ml) 
2080 LET S=S+X 
2090 POKE A,X: LET A=A*1 
NEXT ] 



■110 ] 



: TO ) 



os-; 



) TO 2190 



IS/256) THEN C 
>120 PRINT p Dk" 
!130 NEXT Z 
!140 LET A=29000 
!150 RANDOMIZE USR (A+4) 
!160 POKE A+2,1: REM 1 -fuer 
IRI 3 +uer CR + LF 
(170 POKE A+3,64: REM Taswor 

!17S CLEAR tt: OPEN naff: F 

r "f )4B00 



SPECTRUM 



2190 PRINT "fehlerria-ft!": STOP 
3000 DATA "cc720143c37b71c38b71c 
3c a7 1 r 30072c 35672 c 37 1 72c 389722 ab 
43ca*2bbe28*c232248712a487111cc7 

2 a* ed 52444 d 626b r 92 ab 43c ed 5b4 87 1 c 

d7371c87713Bdb8c9cd9072c83dc0cda 

1 723a4b 7 1 4 7545d c d b 972280+ 7 723f e 2 

0280254 5d 1 0f lcdba710b • 

3010 DATA "18e63a4b71b8c4ba71cd6 

a7118cleb3a4a7il-F3003360d231fd03 

60a23c9cd9072c83dcBc5e3d9dll.be Id 

90s 200602c d b9 72 28d 5b 92B 1 5c b8877 2 

3 + &0d 2 8 e e c b 432 Be c c O 802 b 7 1 2 3 7 72 3 1 

8e3c b 4820» 9060 1 1 8d be d 9072c B3d c 8 c 

d a 1 723a4b7 1 47c d c 37232 ■ 

3020 DATA "28cc*e0d2014181e3a4b7 

1 4 7c d c 37228b d + e0d 28e4 1 B03c d c 37 22 



80a f e0d 28067723 1 0+ 3 1 Be2d 9 d 3d 9d 1 4 

80600s 509 380ee d 32 300ae 1 4 1 3 e207 72 

310fcl8bn2ab43cdlc3b571cd9072c87 

eZ3-f e0d 2B0af e0a?807f e2030023e3 + d 

70b 78b 1 20eac 9 c d 907 228 ■ 

3030 DATA ■cB3dc0117f207eba3e03b 

b 3 80 i 7 2 2 30b 7S b 1 204 2 1 

+c9cdAd71cB3e0de3cSedblcl« 

03c c 9c d Ad 7 1 2n4 87 1 2bed 5bb45 e I bc3» 

db8d3d9dlcld921cc72c9d978bl280; 

bl 3 1 ad9c9c db972c8+e0ac018+ 7Be ■ 

9000 SAVE ■TASW<->DFU P LINE 2000 

9010 STOP 

9500 SAVE f*«*!-ff' a ttfl»* LI 



9510 VERIFY fn'UI'dfue" 



Praxis der 

Datenfernubertragung 



Verhii! Franzis 
232 Seiten. 48 - 

ISBMV7723-S3 1 



Wagner 
Computer 



Wagner Computer 
Holthausen 104 
2841 Steinleld 

Telefonab 18.30 Uhr 
09492/1311 







GRAPHICS 




379.- 


CONSTRUCTION KIT 






erwoiterung 512 ns/ie 


275.- 




QL-PC-Tastatur mit n* 


545.- 


RETURN TO EDEN -g _ 








Interface f Or Drucker HS.- 


Super-Prog ramm >• _ 




39.- 


QL-Disk-lnterface u. 

3,5 -Laufwerk 070.- 


ailoie.tocliJOStuckFr.Bo. . 








SANDY SuperOboard 


Citizen 120 D 








535.- 






Spectrum 


OWRITER 


49.- 


8K5* 325, 



it's, 



iinClail - time 

MUSIC MACHINE 




SPECTRUM 



Assemblertips fiir den Spectrum 



Folge slelll das Qegetutti 



Wandlerprogramm: Textfiles in Basic-Programme 



-Text -> Baaicprgm 



10 DEF FN A(X*>=CCDE X*-49-39* 
(X«>'9"> 

20 DEF FN B(X*)=16*FN A(X*(1)1 
tFN A1X*12>) 

2000 RESTORE : CLEAR 6469? 
2010 LET A-64700 

2020 FOR Z-3000 TO 3060 STEP 10 
2030 PRINT 'Zelle "(Zl": "i 
2040 READ A*: LET 6=0 
2030 IF LEN A*<4 OR LEN AS/ZOIN 



T (LEN A*/2) THEN GO TO 2190 
2060 FDR 1=1 TO LEN A*-2 STEP 2 
2070 LET X-FN B(A*II TO 1)111 
20S0 LET S-S4X 
2090 POKE A,X: LET A-A*l 
2100 NEXT I 

3110 IF FN B(A*(I TO >) OS-256*! 
NT IS/256) THEN GO TO 2190 
2120 PRINT "ok" 
2130 NEXT Z 

2140 PRINT : PRINT ■ PrDgra-m ' 
SCI1 -> Basic" lst-.-bereit. 1 
2150 PRINT -Uorbereiten durch: 
■CLEAR Adresse-1" "LOAD ... CODE 
Adresse', -RANDOMIZE Adresse" 



SPECTRUM 



2160 PRINT : PRINT 'Startsn dure 
h:-' "RANDOMIZE USR 64700" 
2170 PRINT : PRINT "Der Text mua 
e durch eln Nul lbyteabgBBchlD5se 

2180 STOP 

2190 PRINT ■fehlerhaft!": STOP 

3900 DATA "2a3d5c22b03c+d363I02c 

db0162ab03c223d5c3B02cd0tl63B2ed 

7at c d 1 1 62a763c7c*e403007c-F 19227 

65cc*ffcdl9*f2Bf63Bf9cd+3fBdcfcf 

e3819ed01f*cd07ff28e4380ccd+5fB3 

0*l*»20ccl9f*2Sd6da67*E2bdd21190 

106cBCd73*e30023ef 14d" 

3010 DATA "4e<?acacbfdfi>20c40i*fc 

d 1 9f f 3S29 f B222866f e3a2S35+ e3c280 

7f b3bc 4e7-f »3 BB32b22 30f t c d 6d + b 30 1 

77*2 3cd s 7f e 38d 3c d0 1 -f * c d07-f + d adb -f 

de dB7+ e30f Z 1 8c d7ac d B7f e3B0d 2b7e2 

3cdB7*B38032a30**18d679fecb20abc 

d01ffcdl9**3859cdf35b" 

30Z0 DATA ■* 6388b 3s Bc2blB99cd0I+ 

fcdl9**d212*dlB443B3ccd01ffcd07+ 

+ 38 3a* e 2 22 8 80f e 3c 2 0+ 22 3 7e 2b + e 5c 2 

0e7 7e f B 4 1 3 6e 2 f e S6 3006 c 64 1 2 3 2 3 1 8 d 

a<tt613Bd44B7230d0c6lBl8f0cd01f{c 

dl9*f3B0Bcd01ffcd07*f30f82230*f2 

lf0*dB5Bd733d3ccdl711" 

3030 DATA "Ib*14dcb007e20232a393 



Assemblerlisting 



cB3cda711-fd3600*-fcd2c0*fd4631cd4 

40B B 1 7b c d f 5-f e 30d 3 2 a b05c 2 2 3d 5 c c f 

Be d + b 1 978b 1 2 8d 6»d 43493c Bd 3b5 d 3c 2 

■6I3c37Bd52e5606?cd6El9cl28b*113 

313d3c3030303032bBd3bS33cd3cd351 

6el22333cclc3132a6190" 

3040 DATA *5c2b2bBdbB2a49Scebcl7 

02b 7 1 2b7 32b 72 s 1 2 ab 05c 223 d 5c 2a30f 

f 2 2763c c 3c2+ c d d2 1 9 60006 a30e003 1 3 

9cd98fBcb792B031979e9dd2ic«fB06* 

8cd98te37cb79c8630321cB*B094BBll 

8e 6e5d 90600b i c d 2 2 + f 04d d 4e00d d 2 39 

12B+4B67fZ00ac5d9f leS' 

3030 DATA ■bb3B0f5f481S0bd9dd2bd 

d c b007»d d 2 3 28f 80420d 3c 9bc Ed -F 9f 5b 

aaf b8bc 474 f 54c * 474 f 5 333c 252 4 1 4ec 

4b-Fal4133c34c4fc7534947CB<B41dBf 

e 5b 3-f d 0* b6 1 d 8f e7b3f c 9 f s30d 8+ b3b3 

* c 9 f d 36000b c 9b3c d 810* b 1 c 9 7*a737e 

823f B0d2806^B2038f3e8' 

3060 DATA ■ a?c9»737c9cd07+f d8t>2 

0C01 8* 7c d07+ fast e61 3+ d0( a7bd0d62 

0c9d0' 

9000 SAVE ■ASCII->Bas* LINE 2000 

9010 STOP 

9300 SAVE *■■■•! If **•*" LINE 2000 

9510 VERIFY *■•* 1 1| ■tas" 

9520 STOP 
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Zeichensatzgenerator JSISS "USX ™S "™ 
fiir den Spectrum 48K ;~S,3™™E: ,™«'-' 



Eine SchrajBchrifl 


eifclp™»ra«S™gr™ B^rfu 










gcwohnunefihedurfiig ist, ]"c- 










lfW[i"K L .-CDDE]. Daic 






e eingebaut . die i;s ermOglicllt . 


aus ffinf Kaulmen, Hit nch ttil- codic 



Spcet n 1 111 -Sch rift 
einmal anders 


^§jii§|i 


^£.;fr|:a'f, 








... TRANSDATA ... 1ai**d.lMI»S4« 

Endlichl D^Ngy-'Fii™' *£„,-,■ fu, M-Dr. S&OS 

K'^liilut, nisk. 73.00 Ca-lricgs-Po' nur 17.00 
19 (hi pi nur139 00 

E.REITEMANN T e ief O n02t1/432670 
FOIIenbachstraBe 11 W 069/5974485 
4000 Dilsseldorf 30 (nach 18.00 Uhr) 



ReparaturvonQL 
unci Spectrum nach 
Kosten vo ran sc hlag 



SINCLAIR 



Hardcopy-Routine fur den 
GP-250X 



l/M 





Bildschirmausdrucke mit 
Scliatlicrungen auf Seikosha-Drucker 



SPECTRUM 



Hacker n - 
The Doomsday Papers SilSSSSSS 

* spilrbar. Laflt man z.B. a 




SPECTRUM 



Sound-Edi ,,«":",',««"£ 

klari. MoiiliclicRidsc irikliirt 
Sihr.iiiiiiKAiLV.atK 2-3/87) auf , 



An alle 
Programm- 
Einsender! 

Wirmochten uns bei alien Programmierern 

•fur die uieJen eingesandlen Programme 

bedanken, mijssen aber immer wieder 

daran erinnern, da(3 ein ausreichend 

frankierter Rtickumschlag 

beiliegen sollte, damit wir die Programme 

zuriickseriden konnen. 
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SINCLAIR 39 



Toolkit II fur den QL 




Mach einen Punkt, QL! "™ 



r^ii^f-'h'.ii FL-.-rr- yili 



QI^fflifflH ttmrtBliclien, , 



gletchmrVerftipinf. 



; QL 

Schiffe versenken £St<-r*-*»>a 
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Spectrum als Seeschlacht-Schauplatz 



50 REHark ***#*#*# I 



118 fiQlark daein eiiiziger Tref fe 
r tos ganze Sdiilf versenkt. Dad 
urch idid 

120 EEHaik abet fceineswegs leich 
ter alle zdm, tcb Rechncr verst 

130 BEKar* Schiife. zu fuden. D 
ie Sddife belesm jeneils znei 



300 INKt3,2 
310 FILL#3, 1 
326 UHS33, 20,50 TO 24,60 
330 LEE(3, 20,60 TO 25,60 
340 LINE! J, 25,60 TO 30,70 
350 LDBIj, 30,70 TO 30,80 
360 LME#3, 30,80 TO 70,80 
370LIN33, 70,80 10 70,85 
380 1JNEt3, 70,85 70 100,8! 
390 LIHEt3, 100, " 
400LDE#3, 110,76 TO 120, 
410 binds. 120, 
423 LDfdJ, 120,60 TO 130, 
430LM»3, 130,60 TO 130, 
iTmAi. 



L 13,1 



PKCeflure sldw.ywl 



220 HMffl (3,40,18,aM52,ytr*24 
230 IW 13,0 
240 mi 13,1 

250 LUC 13, 10,50 TO 180,50 
260 ARC 13,10,50 TO 40.10,PI/2 
270 LINE 13,40,10 TO 130,10 
280 LING 13,130,10 TO 180.50 
290FILU3, 



453 Ci 



EI3 




470 OEfine PRCCaiiire s2ta,¥*) 

480 OPEN B,S0T 

490 0PEK (3, scr:SClLE#3, 110,0,0 

IK 13,0 
510 FILL. (3,1 

520 VDO» #3,40,18,>wt52,ywt24 
530 UMBI3, 10,50 TO 130,50 
540 MIC 13,10,50 TO 40,lO,PI/2 
550 LIME 13,130,10 TO 130,50 
560 LUG 13,40,10 TO 140.10 
570 LINE 13,140,10 TO 180,50 
580 HLU3, 
590 INK (3,2 
600 FILL (3,1 



620bINd3 


20,70 TO 50, 


630 LDE t 


50,70 TO 50 


640LIN£#3 


50,90 TO 30, 


650 LMEI3 


30,90 TO 30. 


660LIHEt3 


30,95 TO 70, 


670blKEt3 


70,95 TO 70, 




70,90 TO 60. 


690 LMd 1 


60,90 TO 60, 


700 LME#3 


60,54 TO 20, 



i, 95,50 1)0 95,80 
740 LDttK, 95.80 TO 115,90 
750 umi. 115,90 TO 115,88 
760 LUIHIJ. 115,88 TO 105.78 
770 LINd3, 105,78 TO 105,50 
780 LIN33, 105,50 TO 95,50 
790 FILL #3,0 
800 FILL 13.1 

810 LIW93, 120,50 TO 140,70 
820 LINHM, 140,70 TO 150,70 
830LDEI3, 150,70 TO 150,50 
840 LUffit3, 150,50 TO 120,50 
850 FHU3, 
860 CLOSE 13 
370 SSDDEFi-ne 

880 ufFine PKCedure s30w,y») 
890 CPEN 13, scr: 50133, 270 ,0,0 
900 VUEOi #3,«,18,iaM52,y»+24 
910 INK#3,3 
920 FILL #3,1 

930 LINE #3,10,100 TO 40,100 
940 LINE (3,40,100 TO 40,80 
950 LINE 13,40,80 TO 5,80 
%0 MCf3, 18,80 TO 10,100, -PI/2 
970 FLLLI3.0 
980FILL#3,1 

990 LDE 13,40,80 TO 360,80 
LINE (3,360.80 TO 310,5 
010 LINE #3,300,10 TO 60.10 
.020 MK #3,60,10 TO 10. 100, -PI/ 

1030 FlLL#3.ffl 
L040 FILL (3,1 

1050 LINE #3,360,80 TO 400,100 
L060 LINE 400,100 TO 448,100 
HtCtS, 440,100 TO 300,10, -P 

.080 LINE (3,300,10 TO 360,9 
.090 FHL#3,1 
.100 INKt3,6 

LTOd3.60.8S TO 70,150 
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e #3, 385,8a to te.se 



1179 HE) Milne 
W DEFlns PHCCedure slbw.yv) 

a cpbt t3,scr:saii£i3 I isa,e,a 

ft WK« I3.«US,je»M.yv+34 
FIIU3,1 : 11* t3,2 
;0LINE*3, 0,70 TO 45,0 
ft LWE»3. 46, IB 70 240,19 
IB MtCt3, 240.19 ID 249. 50. PI/ 

0LMEI3, 348,58 70 13,58 

a FILbt3,9:DK (3,9 

'8 LINE 13, 58.59 TO 30.79 

e Lnet3, m.to to b,7b 

10 LINE #3,9,70 TO 13, 50 
H UMtl, 159, 58 TO 150,60 
.0 UJE#3, 150,60 TO 168,60 



1699 LMEI3, 
1709 LME*3. 
1719 LDE13. 
172ft LINE* 3. 
173ft U 



a tom 



» LBffiil, 225,80 TO 235,6ft 

N> LEEI3, 235,6ft TO 237,60 

<0LHEt3, 237,60 70 237,65 

» LDEI3, 237.65 TO 245,65 

tft LIKE* 3, 245,55 70 245,53 

LB LDEI3, 245,63 70 24ft, 63 

» LENEI3, 240,63 70 240,50 

(0 LINEI3, 240,50 TO 150,50 

IB IDE 13 195,95 70 208,103 

ift LDffl #3, 208,103 70 225,95 

» LDE 13, 225,95 TO 215,89 

Ift LBE 13, 205,90 TO 223,83 

ttENDDEFiiie 

M DEFina BtCCedure a5(m,y«) 

» OPEN 13, sa 

.8 UK 13.0 

» FILL 13,1 

IB H13DGH i3.48.18,»f*52,yirt24 

IS SOLH3, 125,0,0 

SO CIK1E»3, 49,30,49, .5, PI/2 

« LHffit3, 30, 50 TO 164,50 

Nl SRC#3, 180,5ft TO 180,1*,-PI 

UJ LDffitJ, 180,1ft TO 30, lft 

■ftnu.t3.ft 

» IHKt3,2 

.9 FILL (3,1 

»LDEf3, 90,50 70 140,50 
L7HEt3, 140,50 70 129,73 
« LDffitJ, 120,70 TO 190,79 
9 MKI3, 10ft, 7« TO 90,59,1=1/2 



119,79 70 110,9ft 
119,99 TO 109.90 
100.90 70 90,90 
90,90 TO 99,95 
90,95 TO 105,95 
, 105,95 



1758 LTNHta. 
1768 LDtHI3. 
1778 LDEI3. 
1780 UNKJ-). 
1798 LDB3. 
1808 SUB UEFine 



3ft TO 194 




■ * 


40 TO 290 


49' 


H 


20' 




2ft TO 195 



2167 ninnt4.Hiaf,NfMSiaiSE»4 



2180 IF zz4 THJJJ titel 
2190 M 4,5 tPKHfr "Bitte 
ein tipper": INPUT nS 




1869 HHDOU (3,289/ms,lB0/iE, 

52,yvt28 

1879 INKi3,0:FSPERf3,l 

1889 LUC 13,8,0 TO 114,180 

1898 BEEP fl.130,23, 5,3,7,3.3 

1900 LINE 13, 9,108 TO 114,0 

1918 PAUSE 10 



2272 CSGE (8,2,4 

2273 BEEF 0,50,68,5009,6, 



OPW4,«i:IHKf4,0 
HDIDOV 14,289,180,52,26 
PAPERfl,7:CLSf4 

#4,2,4:SOLI£ 0,0,100 

roe i=«t to as 

LEH4, O.lKVns*: TO 114,1 



LMH4, 114/is*i,9 TO 114/je 




92 320,49 
S3 328,70 
s4 32fl,lft»:s5 328,13ft 

35 380,139:34 380,193 
S3 380,79 



QL 
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2548 aasCR 270/is*li-l)+27,2 :P 


2870 IF Y»<0 OR YK>n3*(MS-l)T2 


8125 LHEH 


RBff CHR5li+54) 


THEN GO TO 2890 


8250 32xH6),yU6) 


2550 CURSOR ZWraMi-l) +27,189 


2880 GO TO 2920 


8375 sz=hz+1 


:FRIOTCHRS<lt64) 


2890 FRINTM. "Falsche Eingabe bi 


8588 ST[6)-1 


2660 CURSOR 302,13+175/ttiMi-l): 


tie cccli sinnfll" 


8625 BLOCK 50,20,390,45,4 




2900 PAUSE 40 


B750 IF sz<10 TBEH GO TO 2790 


257B CURSOR l,13+175/te*(i-l);PR 


2910 GO TO 2780 


8875 GO TO 13125 




2920 KR 1=1 TO 10 


9000 IF ST(71=1 THEN GO TO 2790 


2588NBCr i 


2930 IF JPO- xHi)-110/ms AND xh 


9125 UERt 


2581 FRDnW,"Bitte Mtf 


<= X2(il MO •/*>= (yl{i)-F3) AND 


9250 33 xH7) ,yl(7) 


2583 RQferk Spielf eld negspelche 


Y* <(y2(i)-F3] THEN GO TO (2000 


9375 32?BZ+1 




+i*1000) 


9580 STOW 


2584 am. anfad 


2948NBXTi 


9625 BLOCK 50,20,398,75,4 


2585 T&vxtl 


29S0 ZA-U1+1 


9750 IF szilO THEN GO TO 2790 


2586 REHari Sjdelield zurcknifen 


2960 ipi zx.r* 


9875 GO TO 13125 


2588 on, nc 


2970 SO TO 2780 




2598 REKark »m»«*««MMMM« 


3080 IF ST(1)1 THEN GO TO 2790 


10125 LAERM 


2608 REaari • Schif fe setzen ■ 


3125 LAEFH 
3258slxHl),ylUl 


102S0s4nl(8),yl(8) 
10375 sz=sz+l 




2628 is=l 


3375SOTZ+1 


10500 STfBM 


2630 xs=IMT(SND(238/ri)/iiis)«iiis*F 


3500 ST(1)=1 


1B625 BLOCK 50,20,390,105,4 


1 


3625 BLOCK 50,20.330,15,4 


18750 IT EB<10 THW GO TO 2798 


2640 . ys=wr tRND (17B/F2 ) /as 1 *ns*F 


3750 IF sKlO THEN GO TO 2790 


18875 GO TO 13125 


2*F3 


3875 GO TO 13125 


11000 IF STOW TEEN GO TO 2790 


2650 IF is =1 THEN GO 10 2690 


4000 IF ST<2)-1 THEN GO TO 2790 


11125 L*EBB 


2660 FCfi i=l TO is 


4125 LUSM 


11258 s5xl(S),yl[9) 


2670 IF«s?=3t2(U MO (ss+3.2*ds 


4250s2xl(2),yl(2) 


11375 sraWl 


*F2)>= jd(i) MB ys<=/2(i) HO I 


4375 srazfl 


U580 ST(9)=1 


YS+«s*1.51 >= yl(i) THEN GO TO 26 


4500 ST(2)=1 


11625 BLOCK 58,20,330,135,4 


30 


4625 BUCK 50,20,330,45,4 


11750 IF sz<18 THEN GO TO 2790 


2680NECri 


1754 IF szUO THEN GO TO 2790 


11875 GO TO 13125 


2690 si (is!=xs 


4875 GO TO 13125 


12000 IT ST(10)-1 THEN CO TO 279 


2700 x2(is)=m+tf*2.5 


5000 IF ST<3>=1 THEN GO TO 2790 





2710 yl(iii>=YS 


5125 LAERH 


12125 LAESM 


2720 y2(is)=ys*tB*F2-F4 


S250 S3 id(3l ,yl(3) 


12250 35 id {10),yl(10) 




5375 sz-sz+1 


12375 sz=srU 


2740 IF is (-10 TliN 50 TO 2633 


5600 ST(3>=1 


12500 ST i 10>=1 


2750 FHfark *********** 


5625 BLCCK 50,20,330,75,4 


12625 BLCCX 50,28,390.135,4 


2760 REHark * ELOjafce ' 


5750 IF sztlB THEN SO TO 2790 


12750 IF SZC1B THEN GO TO 2790 


2770 REHark ***•«**«« 


5875 80 TO 13125 


12875 GO TO D125 


2775 BEH> SOW, 24 


6000 IF STI4)=1 THEM GO TO 2790 


13000 FUJ. 13,1 


2788 CLSO 


6125 LA13H 


13125 Fat i=l TO 10 


2790 FSmm.'Bitte smet, K (A - 


6250 s4 xl(4),yl(4) 


13250 BEEP 0,1*25, 8192, 4, 1,15,1 


":CBRS{64*ffls);") uni eium y (1- 


6375 SFoz+1 


13260 PiUSE 5 


";ns;") Oert awieben" 




13262 BEEP 0,0,-23042, 3,1,11,5 


2880 fM=" " 


662S BLOCK 50,20,330,105,4 


L1264 PAUSE 5 


2810 INFUTtO,JtbS,yBS 


675B IF sz<10 THEN GO TO 2790 


13375 ten i 


282* Wl=COI(yBSU)l-48:™2=Ca) 


6875 GO TO 13125 


13376 BOP 5888,254,27474,5,4,8, 


E(yBS<2))-48 


7000 IF ST(5)=1 THEN GO TO 2790 




2830 IF YH2<B OS YW2>9 THEN y«=Y 


7125 LAERM 


13504 PRIKIfB, ZA;" FehlsdBse" 


Ml: ELSE yn=KVl*ie+W2 


7250 si xl(5),yl(5> 


13625 LF EA>=8K TKQi GO TO 1425 


2840 x»»CCDE(*$)-65 







2845 IF m>15 THEN m=xw-32 


7500 ST(b)=l 


13750 HM^ZA 


2850 3DF™*BB*Fl+4:y^(yw-l)«TO* 


7625 BLOCK 50,20,398,15,4 


13875 HIGH =HAG: riftKS=nS 


F2 


7750 IF BZOO THEN GO TO 2790 


14000 CFENM.ntol td score 


2860 IF jm<8 OS I* >ns«ns>n44 T 


7875 GO TO 13125 


14125 PRINT KHHXXaK$:CLOSEt4 


BEN GO TO 2890 


3000 IF ST(S>=1 TEEN GO TO 2790 


14250 fflPUMC'TCCHHAL, ? "-JS 



11375 ZSL-1 

14598 IT ZS="J" Ot ZS="3" THEN G 
010 2154 

14625 CSIZX 2,1:CLS;AT 5,5:FRINr 
'Tsdll!!" 
14750 STOP 

15404 DEFiue PKJCeaure titel 
15401 KHarlt HMm i M M i 
15910 REHart • Titelbild « 

15424 RDIark ■—• ■»■»'« 

15425 SOLE 294,4,-194 
1S826 FIU. 1:1* 2 

1543* LINE 13,46 TO 224,44 
15444 LINE 224.44 10 224.5 
15454 ARC 13,46 TO 24,26, .6 
15464 LINE 24,26 TO 34,36 
15474 ABC 34,26 TO 34,5,-.9 
15434 LDE 34,5 TO 224,5:FHL 4 
15981 FILL liLUffi 222,5 TO 424,5 
15494 ARC 424,5 TO 464, 34,. 6 
15144 LINE 464,34 TO 468,54 - 
15114 LINE 224,44 TO 468.54 
15124 LUffi 224,44 TO 222,5:FILL 



4 45 !> 



... ■ ■ 



1514b nu, : 

15154 LINE 444.54 TO 224,45 TO 2 
24,44 TO 468,54 TO 475,55 TO 464 
,53 TO 444,54 

15164 FILL 4 

15165 DC 4 

15174 FILL 1:LUE 32,14 TO 39,14 
39,16 TO 32,16 TO 32,14:5712, 

15184 nil, 1:LDE 27,5 TO 39,5 T 

.7 TO 27,7 1O27,5:FILL0 

15194 FDA 1:LTJB 24,7 TO 27,7 T 

27,22 TO 24,22 TO 24,7:FUi 4 

15294 nil, 1: LINE 29,14 TO 29,2 

•0 31,24 TO 31,14 TO 29,14:FIL 



O 214,94 TO 235,95 TO 235,65 TO 

214,65:nLL 4 

15254 FILL 1:DK 7: LINE 194.64 
TO 244,65 TO 274,65 TO 274,64 TO 
194.64:FILL 4 

15264 FILL 1: LINE 224,65 TO 224 
,74 TO 278.74 TO 278,65 TO 228,6 
5 :FTLL4 
15274 KK i=l TO 5 
15284 qua 244t-i*10,58 
15294 qua 214 +i*14,68 
15344 NEXT i 
15324 BK 3:LDE 274,52 TO 474,5 

15334 UK 33: FILL l:CIROE 444,4 

8,4:FHL 4 

15344 JOS i=l TO 6 

15354 OK 9-.TUL liCIHCLE l*4+i* 

14,54,2:FILL 8 

15364 NEXT i 

15548 DSFine PKCCedura qua (ri ,x 

15545 UK 0:STIL 1 

15518 LINE Xl,x2 TO sa*5,x2 TO X 

ns.iots to xi,x2*5 to itLaS 

15515 FILL 4 

15528 END DEFira qua 

15554 BEEP 4,53,-2986,7,9,11,6 

15614 PCKEJ. anfad+8, 144678 

15624 FUDSB anfad+14,74 

15625 CALL anfad 
15634 US i= 4 TO 69 

15648 POKEJj BK*«.148678+i«128 
15654 FODSJI BK+14,74-i 

15668 CALL BAT 

15669 PAUSE 2 
15678 HEXT i 

15688 PCKEJ, mfad+8,13299B 
15694 PCKF.J, BftCt8, 132998 
15744 PCKEJT anfad+14,249 
15718 Fcnjl BK+14,244 
15754 BEEP 
15848 EH) DEFine titel 



15228 DK7 

15234 FILL 1: LINE 134,45 TO 144 

,64 TO 274,64 TO 278,45 TO 138,4 

5:FILL4 

15244 FILL 1:DK 3:LIME 214,65 T 



16444 REMark" 

16418 REHark * 

Highsccre - Fi: 
16828 REHark *' 



M OPEN_NEV|4,mlvl_h; 



16448 FKINT 14.225 
16454 PRINT I4,"tfc*cdy" 
24044 HTine PBCCedure ce 
24449 REHaii MMUMMMM * 



24411 REHark ■ ab Speicheradress 
a H2EB34 ab, daat es bsi SpielH 

24412 REHark ■ tolling nicht extr 
a aieder aufjebaur verdai ou 



24424 anfad=RESPitl240) 

24834 RE3TCSE 

24444 FOt i=4 TO 39 

24454 REM hexS 

24464 KKEJJ anfad+2*i .badezfhe 



24114 tga "247C H ,"4442","EB34", 
"267C", H 8442","87B6* , ,"323C", "44C 
8" , "393C ' , "0828 , ' , ,, 224B , ' , "24D9" , " 
51CS" , ■TFFC" , ' 7J6IC ' , 'me" , "51C9 
" , THE" , "7444" , "4E75" 
24128 DATS "247Cy'8002","E630", 
"267C" , "4082" , "4786" , "323C" , "44C 

51CS" , "FFFC" , ■■D6K" , "4888" , "51C9 

,, ,"mS","744» ,, , ,, 4E75" 

24138 REHark: — ..,,., ,. , . 



24154 des?4:Fat j=l TO 4 
20164 hsd&ClXE(texSt3))-4B 
20174 IF badf >9 Tl 



20184 dez^dez-ltttssif :WTT j 
24194 RETum dez 
20209 BID DEFine 



QL 
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Drei Programme fur den QL 



Me WHEN -ERR OR- , e „ njB n 



Das Progiamm CLR_t™ e 



. A = RESPR (200) Speichers 




bmndi. U h r. ^^ 


RESET_BAS 


•idr?L\: "i;,:*" v^-* ^y 


.78.115.... 


Formatierer SI* ?:™ ti .™ «■».«....* 


CLR-BAS 


::;iE:""ZII li——- 


«; ™"ii'™ U7 


,.,, .=,,„. , .==.=„ ijjj ..n..« ( 


III lSr™«3«jns>T_c.i.,«.ia» 


USB KB.rH 1 «i- 2™<rr™ -on 129» ™TL*J=-f TlfcLSI^*- .S-ld! 
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Super- Basic- Re Her *C°iX£p* ZTZZ 
fur den deutschen QL fcTS«Ss; TZ e "t 

MC-Lader: QL zuriick ins Basic holen 

10a REIUrk RETTER CTRL R Dei flbstur-i retta-t bs-i OL <nGCi> 

146 REFit) d^FQKE.W 1,0 

ISO END FOR i 

150 IF =■■ J1.04S9SI THEM PEL! ;T"£.* t=^n|- U~ ■ " : STOP 

£00 PRINT'CK.-TSTCP 
210 : 

,6£,EB603 t u 

i/ieiM.i'MSli, IB + i-J.i, -■::::££ J, SSI 1,SE II, I UK'* 0,S,?? ; :3eC'i,^i:.ZMI!=. ^ 
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Assembler fiir den QL 






Workbench 


Assembler 


Macro- 
Assembler 


,«„_,.„. 


is- 


LdT™ 5 "" 


WKBpe 


••"" 


30 KByte 


mtE ' 


>•»"- 


[EfegUIHttftO 


t™»M*™> 


fceincMa™ 


m™ s 


( File auf Cartridge) 


*»" 


mil Handftuch 


n6K**ro*ra 


ohn C K°pi*rah Ull 


iih.ue Kr.'pi^r^imlz 


*«" 


"*" 


...12.DM 



jt Konlakl bstiiaeji werdci 









Neue Tastatur fiir den QL 









nnmansi- nal-QL-Obertcil cingcpaSi 






SuperQBoard 



ivi-iitrMRBsJiiirtfSirdcjiQLaii. j,.,,^ 

^..lA-ii-i. [3.5*lL\-mgtoBe.i 640K random am: 

Pismi,- ■!,,;■ uotetfebracht: CARE/QJL'MP T. 

-512 KByte RAM (^ISS 






«i QL 




MGG) art Schmisrigkeii 



muiig (FTZ-Zulassuiie) i 






Erst- 

verkaufs- 

tag 

CK 8-9/87 


PRINTdur 


27.7.87 


Handbuch 




..-., ,-• ,-, 
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Datenverarbeitung mit 
dem Sinclair QL 

Von Rainer Hscher lichHenBeieicii>:i;A;!iM!, 

Verlag Hiithig n.i l !<,■■*> ) L . t * mi \ 

198 Seiten. 42.- DM P"nt' ^'ehu dai.,-, da, r.r, 

ISBN 3 -7785- 1325-7 " ai F 




Karate 



ir- ZiiMirn- Oripri.jl in lVi^ 1 
das Pro- chend Gelegcuheit. 



gramnidn gibl . die dadurc 



QL-Sottware 

RBBURO fur 
Kleinbetriebe und 

Handwerker: 

Ad res sen-, 
Lagerverwaltung, 
Buchhaltung, Lohn, 
Faktura, Kalkulation 

komplettnur DM 495.- 
RBBURO lauft auch auf der 
englischen Version! 



Information und Handler-Liste bei: 

software-hausle 
Roland Best 

Eggmannstrafie 21 
7951 Tannheim 

Telefon 08395/29 46 



QL 



Computer Kontalcte-7/B7 



ernes Iiasic-Prngramms 









handlung vcrliigl. Ahcr das (uJn nwn :".iK'.l Jii Spiicli 



QL-Programme ™ » 

audi ohne ohm,* 

Zeilennummern ^J 1 " 



3 Listings fur mehr Basic-Komfort 



PROGRAMMSERVICE 



Jede Kassette DM 16,- Jade Diskette DM 20,- Jede Kassette DM 16 Jede Diskette DM 20,- 



FREE AUSWAHL , 
3er Pack 



Kassetlen noeh Itirer Wat 



nach Ihrer Wahl nur DM 



50,- 




AATARI 



TI99/4A 






jus- i l • i! ■" i . i ii';-'.';jv;i'B7),'Zefcliensmzriniiert| , ,'8 



to 47 86) ThePlan«( 






■ -_ 



Sinclair: 


BESTELLSCHEIN 














. i ,. v i' 







52 Ml Mill 

A 
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INFOS- NEWS -BERICHTE- REVIEWS - TESTS - PROGRAMME- LISTINGS -ALLES FOR ATAR-USEH 



Hallo Atarianer! 



Spindizzy 




Computer Koi-v 




Kyan-Pascal 2.0 



»<"•:•;'•■';'■ -,.;, ,..::;..;;.:«:.<: 






ATARI- 
BASIC 


TURBO- 
BASIC 


KYAN 
PASCAL 


ACTION' 


363 


MI 


14 


1,8 



;iti'[':ihi iln-j Stkn-ufcji iil™m- 


..xlim^nn.l.^mcYcriml,..- 






\, !■;■:; i^innl. I.J s r Ldltnr 


Auch rfcr Conpiki *m-dc in 






ii: -.ejijlitll -IfiKOyie am. ,.;„,.. 
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7191 DAIA 8DI8BI«2B88EB72A»JIBI>E|J7!A» 
8B8SE1A»B1,2277 


W1 DAIA M3FBDMD4M3CBDBBDIA9IBBDBB 
I2M 79BDIl.lt IB 




B1M7B»88>.J2°» 


7B3I DAT* ABt:FIAAI°qB2t1DH<CEaB3:>BF4 


7BBI DAIA l24rj7F754B8A4B9B4BA994«FAAB 


tub da'a ;:■;■;::■(.-.;«%.».-:. t 




MSDIAB4BD,23B1 


:mm:::.:tt' 


J HI DATA ADBAD2aDBBB2A4I8BDlt:B2ADlCB2 


7BB! DATA 1ABBBE17MBC14DIWFF8DJBDIU 


mi »'• •tt;:"'i:i"'n:.i::i->w.i 


DBFBAIMAB,2B77 




77AIBB2B:B.2U3 


7153 DATA 4CWFFIIM78E6£9A3E9»llF»ll 


JD82 BAT A A92B6M9D4W44BDBBKA9798DB1 


'111 DA': ■■:;,;•:...,. „,.<.; ■,-.,; 


MI2D81AA9.272S 




1«S2CM: ; * ..:> 


7854 DAI A 4#SDift?2B?aSDtB72«E373W3B 


71BJ DAIA BA46984BA9B2AIC[A29CEI9bDB12 


'112 M"= :■:••["(. a:*88FI1 F8SI1I -■ - 


3JE«2A?iB,Z3>0 


A8E8BDI7D8.2427 


77C?llFB:D.;i2* 


715! DAT! BBEB!2([E372[aEBDIBJ4CB779« 


7tB4 DAIA 8E1BWBM9D4A9HSD1ADIEE4E75 


7113 DAIA .|:ii;;:— i.ii'-i' ■"■!::: 


EtfUBJEitCiJiB 


CE4E75AD4E.2332 


8Af?A3784C.;E!2 


7854 DAIA N71A3E2£''BiDM34E4l7tA5:B4BD 


■'BBS DATA ?3[994D8BFA?!EBD1E75A?CEB0M 


7114 daia >}7;MMw«:.w;;!:BMm= 


FC7]MFCH,2!2t 


t2W7ia0ll.2Z» 


fl37BBBF-»ji.:;;; 


71! 7 DAT! ElBDBIDBBDlEDI«DC77e3BE l 1244A 


"BJi DATA B24BAB4BAAaB<B7B7l7BFB37[J73 


7113 DA'A MU.'BBBAMH'UHa: • '18! 


4ASDCI 7SC4.2 5S0 


F87I34BM1.22BB 


BfA1782i:t.;i38 


7858 DAIA i!JB8SHI(8DFC73EEC'7!«i)a7e 


7BB7 DAIA !4 2C9 1 94J85 1 34845 154BIS1S4 DC 


Till DA'A nHMm*FtFH3lCSPj4Wft 


3B88444A4A.231! 


31 3418 52! 4, 1741 


fflFFFFiB3.i6'" 


7[5» DAIA M BK B J B »« 1 BK 1 73 BBC 6 7 3 S3 FF 


7BBB DATA 3432S4iB52348C5254B852:4EI52 


7117 DA'A t77iHi:50I77HBB3iEC87!Hi0 


73A9BIBDE1,!7BJ 


FI717BC214.2I24 


FFFF4BHal.;:'E 


7BB1 DAIA 73DDC77ieDfE73AiFFCBCt[B7BFI 


TBS* DAIA B4H82(BBIHI2BIB24i857JBI8B 


7118 DAIA :■--.-}. :„ : : H J ■ .: X 


mmainwt 


BBBIBBBBBB,!48I 


CE4C74AJ4C.;:?! 


?Hbl DAIA 482CBDCI738Dr.773BDFE7J91E9£E 




711= DAIA '6^'Ffe»JC'8l2=A2*l;F)[884 


D 1 7 3EE [873,1138 


8884918182,2431 


!9i!FBBi4c.;;;; 


7Bb2 DATA EEFF734tra73ACC77BB9M31BD24 


;«?L DAIA 94A8AS8tACAIB3B43IA3ABA:AEA3 


7121 DA'A 2078«:'1C»4::«D;t'i4:i"B=i 


2 1CBD41I5 1,2383 


A3828B8ABB,I?79 


FiCtWIU.im 


IBt3 DATA 8325218BA02421C8JIFJ2EC9BAIS 


mi DATA B7B2A9B4B4ASAE8BA9AEBI91fme 


7i2> da'a Eif uammwiHmvimtt 


43»I2F8I3,1831 


94BIA2B98B,313I 


4CCSB8DB'4.;^I 


7Bb4 DATA CBAD252iCWlFllEC™il33i:8l2 


W3 DAIA F3B4ASABAIAESIF3E3EBE1F4FA8B 


7122 DA'A ADie;.;«B : B2*[-BA2:Ar8i;::' 


F8B3tCtl7 4.1897 


8ABBAD0iA3,1331 


BBFBIEA : ».;;< : 


IMS DAIA BCC77B2BFJ732IFB734C4B74.A1B1 


7894 DATA ABA[A3AEB2A3B5B4A8BB?IWBISA 


7123 DA'A 8DCt2«:Bi::!1(;::<c:j:8CS;8 


998B31C84I.224B 


BIWWWM.iWJ 


21a?ieb:;a.2b»e 


■Boo DAIA 2EFB73*DI1Ib1Bb1B5C?273IB8A9 


7193 DATA BIAD8SA3AEA3ASA2A9B2A7BBBIB« 


7124 DA'A i:-W.it::--l ■:.>!. :t--i 


27BDIIIB4C143B 

7147 BAIA 4B74tDBiB44tiB742IFBT38B[iAD 


88618181811,2848 


8D4C74A[68.:B:' 

7125 HA'» '!CW6 : t:i:9#gB'f:t<<t)B;P'} 


4374bM4BB,I7IB 


BBBIWAt 77,2286 


?BSlEE8E'3.24.t 


7IeB DAIA I3H«I!EEMTUBADFE7!EU[S1 


iB97 DATA 8D2982A9EC8I]2Ba3A9B2!Di»B2AB 


7124 DA!> 4CFbTtiDBA7!Ci:«Mb<SSA';4; 


FE73BH3E£,2!22 


?2AI74Atl7,lB42 


F4?7AfC.*Bt.2Br 


7149 DATA FF732(FB!J4CCJ7ll»BIA2ISAi7l 


7B9B DAIA 2B5CEtAB32A27BA9B44r!CE44CIl 


7127 DAIA BA':AB>39)!|7:tc: ( ''8!fD;B3C 


A9I5ZIB?7(.1?16 


77FFAD4C7a,2284 


9£TBAAA<M 233: 


7B71 DATA SB Bi; 37 BEE 1471 18*83 Si St? 7 8 71 


'B?9 DATA 8FjB4M»DB4D1BJF2ADI5DIBJE!C9 


7I2B DAIA 'DMBtC^I'AiBtBBtBEMIEEIBt 


!A)<llIlll.l3lt 


BIFIHASE 1,2MB 


BBIBIBBtN III 

7128 DATA IBBIMWIBBKtlSi:: ■■•'•:-■! 

ISBBIBE:;-.:-: 


NHIBZ2BF, 141 


I IBB DATA BDC77BBD1EMS!4DADIb72»B1FB 
D7EE7174AB.2719 


7BJ2 DAIA 4De273IA!llEH!21BtlBIBINtE 


71B1 DAIA 7l7tCDI=72JICCA9BIBD7J?i£EBJ 


7I3B DA'A '-. (!Mf((»tMl*^'!''-:»i 


BINIB21b5,374 


i 4AB B3B b[9,1?79 


mtmct.M 




7112 DATA B«DB2iA?BBSDB3BSCE(2BiADB2B4 


7131 dati u;efBTBBA3 :! »[!r;;iB;A;i; 


B84D45746U134 


[9BBDB17A9.157I 


DDBF7B?i:j.2».l 

7132 MM .'8A:FrDtf'88!FE«F : ;o::.'8B: 

FFFEM7«»;.1J'8 


BIMHBBtl.lM 


7183 DATA 848 DB28aCEBlliABBlB4C9BB DIBS 
A9I18DE1B4,12BI 


'(73 DATA BBJBBiBaB(ee(BB»2i?iiCiC:ABB 


7IB4 DAIA 8B2621EE4B7aAD4B!tilBFA9l3BD 


7131 DATA Mffi»WDIa»101JtnBMBi 


BBBIBWBIB,3?7 


4B74A981BD,2HI 


8B7B4)A°Ib.242b 

7134 DAIA i:.-l- : .:i. :t-.::-i i- ■ 

Ktnnv !.r.-, 


48BA489B4B.3E4 


718! DATA B1D2ADB472BA8AIABDBBD2A9BB8D 
1B77BDK77.1594 


7177 DA'A A93FBMBD4A2BEEBEB8ABDBAD4BD 


71B4 DAIA A951SB1977BDID77SIBCA2B1EBBD 


7113 DAIA -.i,-?.. .>■■■■ ■-.■■■>■. .1 


lADBEBIFDl,23s3 


FFFFCA9DFF,2b72 


837BA829:2.;4!4 


7B7S DAIA F3CAEABA6DBAD4BD1ADBEIBFDBF3 


71(7 DATA FFE8E82CMF31BADIB77b5'ICBD«B 


7Hb da'a ■-i::t:-y;.'it-.:t :.-./■ . 


S?IA8DlADI.27aI 


77BDBC7798.2343 


BDB3D2BM , .22t8 
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7117 DATA 02A23BECIBD4DlFBH6F'*MEi2S 


71 66 DATA ADBADZ3DI4D24 


ntnmnz.2Ki 


atWEitll, 1833 


im data ecbbd4dbfb2B6F7?a964Cdbbd4D1 


7167 DATA A913A2I12I4F7 

K7BA4!862,17iB 

7I6B DATA B3Atfli2H37BA 


raumkamttHBtmnimtm 


immsw.iiii 


E6A6E72B[A,2443 


1 14 J 06 ! K W 1 1 MB D 1 * DE i M '4 1 658B 2 1 W 1 1 


71 W im 7B2I4574)2HA 


UH2MF74. 1121 


27C47EFI!9,!466 


7141 DATA A9IDA2B3A1212BI?78A1*BSDiBD2 


7171 DATA [IWIBEFC'SIB 




DBB333E!2B.2B8a 


7142 DAT) BH3t2A?222(Cr.79MB621CC71A9 


7171 DATA EBlEFHHDMt 


l98DrjB7!A9,I38B 


AD7IA1FFBB.2BJ7 


7141 DATA iJ2BI>D79CECB7 l »DBFbJ»9EHBMBBJ 


7172 DDT ft FCB2ttCAEIFFD 


tCH71M(B.2271 


1DB4B6A9FF.278J 


7144 DATA SDD57»A2FF3EilS2AB8BBBEHIFDCA 


7173 DflTft BDFCI24CAD7B6 


D1F56BBBF 1,3114 


Elft9BI8D16,23i3 


IMS MIA J f A2MBEHDa HEEA7 9H9FF EOtfl 79 


7174 DATA 72BDBB21A9BBB 


BDM12MU.29OT 


B28DB2D2ft4,21Bl 


71*6 DATA S8»FDEBMEAA?JII8M4il28DMK 


7173 DATA ABBDB1D2BD93D 


MA5E3CB1.283B 


793ttlD2A1.Z39B 


7117 DATA FI2CA04374D9BIFB25CE4374E6E3 


7171 DATA 23BDIDB2ADICI 


A91CB5E1A1.272B 


A12DSDICB2,lB7b 


7149 DATA BtBD9B7BA2B9A84DA1FF2B137BA5 


7177 DATA HDICB2DJFBA95 


F113i?»)AA,225B 


92AD1CB2DB.2B6B 


7149 DA! A BEC878A9BF9D8«4D69ttB19a9!A3 


7173 DATA FBM3CBEliDZA 


7SCBCHDIH,231i 


HJFB2B3A79.212I 


7159 DATA FB6BlBASE6i9BIB5E6?H2E6E>A2 


7174 DATA 2IIF79A9C9BD 


2CdEC777CA.37»7 


FFA2MAB4C21I5 


7151 DATA BED!77A9318DCB778DtA7;ftDBAD2 


71BI DATA 2I93JBA9MBD3 


186DBAD2CD.2617 


tflA9]61BBS.lB1L 


HS DAT ft MD2DIBDAIBDA9B;21U77BaMFB 


7181 DATA 242I1B6D2421A 


4CI67BABi9.2186 


BD24 21 9360,1641 


71 51 DAT ft 2tDB779?fl37BCB[BBDD»F)A«e81 


7182 DATA 242IAAA1B12B1 


A378C984D9,2712 


ED2421 AAA?, 1725 


7134 DATA B38BHF6ME9B9»37BC9B2FI]1C! 


7133 DATA 1D2B397D3D242 


B3MB2C-sE',2571 




7155 OATS 21347AEiF.?ASE1C9BCFB2MH[8S 


71B4 DATA AB3A7D1B692CB 


A1I499A37S.24it 


BBDtB2A21S,2127 


7156 DATA C4E9MFiADBAD2l(iaADMD21l1C 


7185 data mtarnmu 


A4E9A9BS99.25B1 


E8A5I4 2931 ,2245 


7157 DATA A37B4[B97BABBBA9BI2B[;677BBM 


7 lit DATA 7D215B71A97BS 




l3A2ti2J4F.17(>4 


7133 DATA 774[1i7BA4E?B8CKlFI2BA'B3W 


7107 DftTA 74A2BBAB21A95 


a37B4cm;b.2164 


D3A2Bi2B4F.I?71 


71W DATA >D8AD2111BME1BB*DIAD2]BtBA) 


718B DATA 74A2DBAB2IA1B 




A'I4B3£5A1,227B 


7 Hi DATA 117BA9(A91A17BBBMI919ft376AB 


1189 DATA B2BDB672A9FFB 


IIBW37BM.2IS7 




7 in DATA [i77CBC9BCWF3A1BB8DC97B4JEE 


JI1B DATA 4C627I1D8BI66 



7162 DATA C»891BB4r.EAE7SttC?lSDiBll[F9 1111 DATA 8BBB23AAS 
716BEE8B7B.2219 BIFF 9393 B 1,1 137 

7163 DATA ADBB7inB2BB71A;BBBEB(7BA[lB 7192 DATA 918515151 
2IEBBB1B2I.2117 55tB4BSB5B,ll91 

7164 DATA 2B777B217776CA9D1B29E9E997D9 7143 DATA 54545)55! 
ED482B 77 7B , 22B? 48A44BS51 8 , 1 45! 

7194 DIT ft BBIB2IBI! 



7195 DATA 29AABEFFCIC3H9BI9NIIHIB23 

IBftABEFFC3,19I5 

71! i DATA £!(BtBBIBItBtIBI282BAABEFFDl 

C3BIB9NIB,12BB 

7197 DATA IIIHI2B2BAABEFFE3C3IB1IB1BB 
tBBIN2B2S,l!6! 

7198 DATA Aft 
B1BI28BBBB.1317 



■ 



il.lSU 



*,i7n 



72BI DAT* SB 

2B2B2B2B28,ltlB 

7212 DATA H 

5B4B483J3),U98 

72B1 DATA 1315IM»IIIBM1!»F4F4E5M 

B3B4ftlB2B4,242B 

72B4 DATA 81£4F2[AE3EBE5EE8iBtB8A7EI£D 

E3BtEFF6E3 1 3BlJ 

7295 DATA F2BBBFBBftDE9F3F3E9EFEE6BEi£l 

E9ECESE(BB.38M 

72B1 DATA BBBtBIBtBBH141Altl5BII 71319 

1919141613, 3! 

72B7 DATA I8KISB4BBB3E9E581E8E1E2E3EE 

8K5E'EEES,317I 



F7E1F2F49B.4M4 

72B1 DATA E7E58DetnBBF3E3ESElE6E6F4SE 

fl2E'F4F4E5,3B7l 

721B DATA 8BE7e;E2E3EEBBB3E9E3BBA9EBF2 

E5EE8BAEE1.38I3 

7211 DATA EDE5EEBBE5E9EE9A1EIIBBE1E9E5 

HEBE 1E2ES, 352 1 

7212 DATA EEB9ESF3SBE7E3F3E3EBE1E6E6F' 
BIE4E1F1BB,4B19 
7211 DATA E6E5E9EEE4ECE9E3EBEDB93IADEI 

E7E3F2B1FA,4«4B 

7211 DATA F5BBFAE5F2F3F4CFF2E5EEB1B1A2 

E!F4F4E!BB,3194 

7215 DAI A >EE1EDE5EEBBE3E9EE£7E5E2E5£E 

J3696567M.3343 

7216 DATA 72BI91BIFFFFEB92E1B2H7B.I19 
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h.ejlo. ;-. u ™~ ,":, J ", 


12<B SOliUD l,8,i,(!Jt=2;T-5iE:5MlF«;i; 

ISM IT-»:IF »M THEU P.ETUR* 

■ ... ■ .:.'.. .,, ■" .. ... 




Like H.E.R.O. 

J C05UB IM2:C0SU1 5115 

' ■■ ' : ■ ■ ' '■ 

14* IF 5=11 TW> teItl*=f-l:5=M:*=*lS 

=P-l:605U» lltt:S05lll lit! 

:!: ■;■■. ■ : 

t,i:v-iinumin*a :u not* mid mi* 

B S7£P -1: SOUND 9. 1B«!«, l!FOB F;fl TO 


itsi tin'ai, r. , , :.'.\ll'.i,ln 
,is,m,<', i i|g 152,217 

■ "■ ■■'■■■■' ■.■ . ■ ■ .:■ 

3157 oeri; .:... ■■■ .- t»,uM,% 

'■■■■■. .■ ■ ■ ;' '■ i. ... 

18.«:P0IE 7BM2:P0KE 711 ,88:»E1U«N 
SI05 «=l:CM 

511! POSITIOH j,5:> B6;'h,(,r,«.-JPIISI 
5!12 If PEf«ISl!7«(>i •■• SIBHIWOt 

..■; it it sitinsii i:ci-i:n 



ATAR 



'atari 


ii2.^i*™«»^ 




1Z.T -• ■*. 



Atari Tito' fur Sie bersil. Einfa* 
nebenstetaiden Bestellschein 
ausfjllen und da; gewLrtrnts 
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BUCHVERSAND 





ESSC™ * 




ATARI 





■HI 
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Bestellschein 
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Textadventure: Escape from Delta-V 





;],,,:, .--,-. ,v.i™miiK. isl rrar so 










s,en564 ™^X d ! ^ i e ter 


C^"u'=Aiis^«^ 


dinM;.. 


din Langs di'i Franc smnii -i 


^s^^ns^- 


■rank in 


























I .11, ■■ >;■■■ .nil ;!■, S.'ilin:!ra;i' 




A«ta 



11 0- >h di- Trainrti'i' .tllllOidt'II tiJTIIl l.iHL-ti •■■.■ ■«■:■'■ '■'"-> " '■"'«■■"- '"■ 4. rrognmuu ■"■ "™" 

Pmsram^ aft T«*s » ken- ^ d -^^ F e a r ' ne t u D ™pi e f=Q Ein«M"iilfe IStrfT Dnbat* W^ege 






DELTAM.BAS 






DE LTAV2.BAS |||if| 



iiHtSHE' TK1I 115 _ 



















ino'iti" j" nniu(«,u 

ITIlllli* 1" ■ '■ ' f:ra-"^0'. ■'/".' ■*•■"' J!I m-NIIKEB 

■':■''■■..■ . 






. „.„,„,_.. 


it H ,i. L«h. -Ml d« ein, «i«r 


•Kt tut IV npiHn ist tin Hhli 




















jr!«h!j' , ES"S S'Ut'whSS'JS* 














".: 1:'- ■ : ■'.■; .. ..„ . 


















































































































































ICfS'ZSfTf 




















tit a'ltuatmiU^t'- ■■•■■: ciio t 


"I IJ=-.au f ««ril*-:aiS="i n drr" 


■™!i"««Si?; 


*n kiiio at 


.:;.. ' : ..:■..-.." .■■ 


IM'SlS=iCr Wit lint t,„ BUM. 












































TXTWRITE.BAS 


18 3£C!I3S*SKF»&» „« 


IS !»=»■!■ !i * h " °" h " ■™*™ ! -" 








!nl -™- 1 


t!"«H™ HH ttdxkrlttti.llt turc 


,-.,; ■iOtc^iuanria.' 


S^U^.hw** i 






































lM'ul^Kkrilt 'MCI. ihp M T'.": 


SfLUnJtStiJirwm 


..■■.■.'.'■■■■ ;.. 


» > ^'"n'i»£t" I «i! I d^'F>M£!i w 
















ijlT^Si'iEk'tl J", fii!!:"' """ 


fiaf'iujswssi: 


■it let- t**«! ^rnt. tJasUtHbeB. E 






































^..awRiKmi 




















: vttrn hr simst hi (i 
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EESun.'Bwtmr, mtab.bas 



E 



Hardcopy fur den 
1020-Plotter 
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d glcrehmitig CONTROL 



SERT-Tam. waliren 




Beispiel 2 



Hardcopy-Routine 





P£T£A'S 
ASSEHBLEREEKE 



Schnelle Linien tStSHTSi^\ 



HOK-Befehl der I'l.UTm 






igabe d«5) verflf . ™G™Mp™l 



Sourcelisting 
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Ohrenschmaus: 
Soundmachine 



Be«t.-Nr.AT1 



29 .80 DM 



2 



Lehrreich: 

Das Assemblerbuch 



3Vielfalt: 
Atari Power Superbuch 
r— 



' Bast.-Nr.AT3 



_ Nachschlag: 
MA Die Hexenkiiche 



4 

5 
6 



Best.-Nr. AT 4 



"«"■"»» 



Zuschlag: 

Diskzu Hexenkiiche 



Fix:ATMAS-ll 
Macro Assembler 



19.80 DM 

■ K 

Diskette 49.- DM 



8 

9 



Best.-Nr. AT 6 

i Geistsparend: 
r ATMAS Toolbox 

Best.-Nr.AT7 19.! 

Praktisch: Monitor XL 



Best.-Mr.ATS 19.80 DM 

Brandneu: Design Master 



II 



Halt! 
Diskmaster 



IS5SSZ- dm 24.90 



(&[*? Speziafitaten-Beslellsciiein 



Best.-Nr. AT 9 Diskette 1 9.80 DM 



6502-Maschinensprache 

Ein Kuis fur Atari-User- 6. Folge 
,10 der letzten Folge w^res ProgrraucsoltenathMBsKtt- Is. schliailid, J a . En.l. Jer Pra S i™ 

u^^tett"™? h L '■:,,;,■' .,; 

tatcmiplteigMtLchnurinMa- E j nga „ ge) . Hicr IihIkji die Cu- p"" ^iraaMer.^nX,?^ die Internal 

M -iiiiiiiwj:- ■..!«■ K.iliiMi .i-iii i! ,.. r .-Ciii'-.:i' Amp ill' hi-. j,,,, .,„ 

Trageakommtri. ger jm Spiel- So sor S l ANTIC ™ack xiimTriV" Scii Uoil ! i =.-li -.• ! i-J ichii-,1. ! 

Wl-IcKc V.irldlc lucKI nil- . .".' - .1, i I: I mi 

"■ill J.'l lr .'.I'.i'H'l ■ ■!■■' ' "■■ ^ ,„..■. , *:l,l c !tc 



iislelli. NiiiiirR-li Burden die (utln Belspicl j_ eretEn T(i | dK p^ 

ff^efcteB M J'^flrt Sckritt fiir Schrirt JJ* ^.^^^ e F °'^ ^"s^^utf dif s{Z 

= V " ^ "l UHRVBl'k 

inV^^T "lg " B ^ Inm,Ml1 






i-.'kmn-fci. 
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Dlsketten in Farbe 



Computer-Service 



Atari XL/XE Krailsinfus!!! 

msmnnsnm 



l.lll.'I.UJlM.I.^IJ.l 



mssmsm 



ATMAS-n-Sourcelisting 



-- , " ,w " 1 



an ATARI 

Design-Master- 

Bildcr auf 

SeikoshaGP 

100-AT 
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ATARI », 


Programmduden 


Kit Ma], (irjlik wird cin- 


nufiiefmdtii *li sin LI'KOM 


XL/XE 


u'j;':, ^"liM.K-nTiV'L-VlV.'lH! -iM 1 ''.' 


k';'.'„.i,- :':'■' '' 'r>ie* ln ziifcfiijoBin 




■MVj-.l l/..ii».^.h,;,:. 






tersiffltleins.saBBoriBteiKri. 


stungen an. Gehause veran- 


ProBninitniliiden 


Z2CTX2225? 


ruAdum solids EM*,*. 










Eesckr piling :n, 
Tip: & Tricks 


™Aae™°Pe[ Cbi:ri: llllfl:l " d 


£i;-!;::iSH;S 




f"*"& 


*£&£*da£?£ 


gulc ™„ s.1, , 


;SSZ"£S 


ProgrnnmB lor: 


•■Ll^ Iv^U'.lll'llLI] Snicij .iil! 


;™.si"*™i 


ISSSunCnuiSi 


B00XL/I30XE 


jsiSL 


„,.ch ™ 




;li uKTMUhcn DiTl'tnimriio 


S2SIS;".r;-.;,.. "■■'. 



850-kompatibles 
Druckerinterface 



iiiljjcmcii: die Ccnr 
usi.parillL-lcl.hcrrrs 



cssnn^^asa 



N COMPUTER ZUHfiUS 



Suchen Sie Hard- Oder Software 
fur Ihren ATARI 800XL Oder 1 30XE 
Computer? Dann sind Sie bei uns 

an der richtigen Adresse! 

Wir sind die Spezialisten fur diese 

Computer. Wir haben die richtige 

Software, das passende Zubehbr, 

und unser Reparaturservice hiift Ihnen 

bei Problemen schnell und preiswert! 



TELEFON: 
0208/497169 

Compy-Shop OHG 

GneisenaustraBe 29 
4330 Miilheim/Ruhr 

Fordern Sie u risers neue Preislisle an ! 



Disk-Software auf Cassette 



Das Doppei-Byte 
Piugramms an. Puri 



!cr ^j.iniTe "■ i>r.^::iiiL 









ilai L_kIcti- cm Diipp-.- : .:w!i h 
IVIT.Ul m'.chiirtfn. erioltf 



W IS! loiWIVA'l 



COS: MC-Lader einiosniDssMosMaDsswi 



Z856H et 6 !? 8098 ? 81 6 ! J 65 1 6! 6 
J*5M05I 

!>D5Maamtn>tiM: 

E 168 18»8 15 7 8 1 f 8 50 5591; 5FI F tii J* CSCoil 






6 taB5F5MFI811CM861J 



J5S 58 81S » 161 8045) IH) IIIIHC 

2 6B«6C 5« 88 05 MC 51 1 FB8 1 6»6SE!B2t 5B±0»Ei 



5?6iHFB»Ci85DBH 



i!0 58 S85 658] M«2 1 PS81 SO 58 Bit 65 » J 0)84 3D 
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Noletitrainer t *? n ^\' w \t\^':T::' : 



M ATARI C.mp„1.,>«Ja6-7/» 

Computer-Lexikon ^„„.,» -,K_~,,.».. t ....... 



cp/m 

Versioneri erhLUilich Bind, ill audi OVM nicht mclir CP/M. 
CR 


DFO 

n d n rrr ale Fern r. 

Cicriui; I Modern-, ink-, Aku>'ii.k.yj|ik-r i 

Dialog-Box 


Mi- 


len abjeschlossuil uid ifcr Giis™ jn dm Ucpnn der Mgcrider, 


JSSTJS 


Cracker vtrbrinjen : .hn- Zed am lifiKlen damn, den Ki^pier 


Digital 


,aataM, 






,Uie n programme 11 icnto era leu i_u* m^i,^ 

Slan-.S-qip- und Parily-Bits I'rager derei- in d.-n d.-i:istiii:i Ssnfhsvhraui;! 



.eiruniren Jcsa-.mpmi.-rs. auf deacr, Dale,, Urn- nnd h=r S e- Displaj-LIMe 



DilieilSchU'Wlk'T schirmaufbmi ik^ A:.:n :':!'. Ii- '..Mini li'.i ;irnli:iL-n KechnLim 



icr , u 

cr Well verhindcn [win Uc: Aru.ic, :d,-mi;.- ivi .1 d;,„:i 2 R. .!■-■ I :s rhi-fjii-^:: --■r;n..i:n m v.-,. S 

rSLrilS,-:v...,kU.crl,i,m.(k- a ti l : » 4 e H rbcri gleichi 



In asi.^l:: atll-a. F PUOM ■..,.■ r,i, ■ 
dL'i.<ik';>iinc l..vkvdtcnverfiij!bar>f 



L'mTc-\-ri:i,iinliPn)i!raiiiiTn.-)i'i:i;i]j;-bcii uncL^nv 
•.: juni Liiiii.T,!-. m.,,1 , :m soL-lia rruiiranim „■:» 

Ij.i'i Sprutiis ;:£/!i 'Hi. k- Edition mfiigen oft nucta lit 







msii its n a 


SYSTEMUKSCHALTKARTE 99. 00 


HIGH SPEED BDARD 19! 




5I2K ERttEITERUN9 39! 




VIDEO MEISTER 19< 




SOUND MEISTER 14< 




DRUCKERINTERFACE 19S 




E+K ERWEITERUNB 35 




HIGH CHIP 9S 




HAPPY BOOSTER 149 




PR0GRAW1 LISTE 




CLUB IWO(CA.3O00) 




KATALQG 




*sflsB*® 5 






8T FLOPPYB AN XL ? i- O. O 


IBM FLOPPYS AN XL ? Z fe 2 
750K PRO FLOPPY ? jSS 


KDPIERT FAST ALLES ? K Q « 


EPRGM BRENNER BEI ? W( 9C ' 


DRUCKER INTERFACE BEI ? |S UJ g 
RS 232 V0RHAN0EN ? g CC g 


WOCHEN 1ST ES SOWEIT. *~ ■£ 




a/.iiHi ip^ i iMii' H' i Aigai 



52.- 



IWIJil'I'IIW 
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TI99/4A 



Liebe TI-Freunde 



n rnaL-hen jedcs Anwcnder- \ 1 i 1 

:e""""'l::- \Vf 



ra/ins nocn titsw/r j«:a!ten iranksistcm vor. ,j ve .vbcmnsche unterfcrinia™ 


Window Manager 






Bri'Tncniuci-M-ai-Kni-ii. »«■ f, Lrl , 1L .[ jp^u Jn J,. r neucn JieSchrcLbflathciiidiejcnacli 




^n^T"" 1 "^" ^lt. ™" CK - C ° mP1 " e ' JESJSJXTSTlS 


^HP lls=!l 


Jetn abcr zum ticuli S cii h.-p. Scb.i.w.k """S^ J 1 *^?^^^^^ 


\ .V. — — 


Ein Window-Manager s^S'b^M™^ 


1 ?-™VSisJ--| 


fur Turbo-Pascal 99 |*£"E^*i?£ 
















* n u | „ ,vi„j,m. - 1 -" 1 '- r - ■.-;■... ,: . 










^£!F5lSX SSS^^ t h wi v " schiEdeneFomen S23S5S3S£f- 




^hihli.^k ,■:,: ^liarliv „[,.,, m.^ht, » ;i [ ±1-. Kvnal [»' «j™ *> 
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Easydata 99 


„AUCHIMSOMMER..." 


Dateiverwaltung 
sprogramm 


sag. jOj; lP§i 


9V win mates tt^rk nir. k'. die /al-,1 1 ».Nrc iii ■JCIUI IJU 
Hicrlv: hanilcll f< \hii uni cm I'll sclic-ihcn die Zaal JS.S ,it 

"Easydala 99- LsE in zwei 7us c u h] jj 


GENEVE 

tMIHEMCaWUTBtlNTMC) 


Staubsctiutzhauliefl 


irefer Wahl'dM 


MICROPENDIUM 


,,.:;"";;;:;:. BHHIHISBIIIIIIIfllilllHHHI 


£=ESHE xSsHSr ' 


'ZSSZ?**** gy 


sssa 



I .'i:i^'- liJld |L"\ oil,^, £! L '?Ck'h 



Erst- 

verkaufs- 

tag 

CK 8-9/87 

27.7.87 



W ai ,jcnA 1 ..,lr,„l.,l,:D-:.. 1 i 1 


,-, r-,-,V 1 V 


':.""'■ -'- Idll - t Easjdat- 


irtrumiKlc, - f r 


■.-... - 


Zusammenfn 


























Dies kllngt alfcs eia wenij 


ren 'a^-emIc 


































aus der Well ,1a Datenra„kcn 


°™ either 
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*WS liegt b=i 4 MHz iiii 



it nur 40 Ansrhlilsse auf, MHz-Quare 






Lei SpeichirT'u^riffcT] eischt 



\njthlufl die Ausgaiw von W 






) 40 41S/CRUOUT gen, dai) B 



i ilbertriSi iter ausjelost. 
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Neue Software fur den TI 
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LEQKJ COMPUTER CENTRE 
Der griiate TI-99/4A-Saezialiat in Hoi 

fert jetzt auchnach Deutschland. 

(urid wir iiefem direkl ab Lager) 



Neu fur Dautschland: 

TRIPLE TECH 

3 groBe Sachen ajf einer Karte 




. UHR/KALENDER 

. 64-K-PRINTER-PLJFFER. Aibeitet ohne Problem 

auf alien Printem mil Parallel-AnscNuB. 
. SPEECH -SYNTH. -ANSCHLUSS. Die Plalitie v» 

Speech Synth, jetzt in der Peripheric- Box. 



(SK 



• SchnelleralsTI-Disk-Comroller 

• Karri bis 4 DS/DD-Laufwerke ansteuem 

• CorComp's beriihmter Diskmanager wird gratis 
mitgellefert. 

• NeueSlmi • in; ■ . : ■ n..: 

CALL PEEK CALL POKE 

CALL PEEKV CALL POKEV DM 498.- 
CALLMOVEM CALL EXEC 



AlsairzigefauSerhalbUSA) 

Geneve 9640 im Haus. 
Llatertermiri aulAntrage. 
Preis infcl. Tastatumnd 
Software DM1195.- 
Fordern Sie gratis unserei 
kompletteQbersichta'terTI 



1 28- K- RAM-Erweiterung 



isser-Haagiveg16i 
ii AJ RYSWYK 
31/70/995757 



Tl 99/4A 

Musik aus clem TI 



Eiiigiibelmmat tin !« 



TI-Software-Hitparade 


TI 55WA. 






Dei twigc Spitzenrciier isl ablest!! 


1! Auch out den 


PHaen hat sich eirages geiau. Hicrn 




Top- r™ 


1. JOYpaintW 


(2) 


A. AS 


2. AxelF. 


(.•) 


M.XB 


3. Tl-ArtistU 


lit 


A.AS 


4. Turbo-Pasc99 


1 HI) 


PS 


5. Monopoly (CK) 


131 


S.XB 


6. PR-Base 


1-1 


A,AS 


7. War Games 


(-It 


S,AS 


ft. Rapid-Copy 


<-» 


A.AS 


9. DM1000 3.5 


(fu 


A.AS 


10. Submarine Com. 


H 


S.AS 


Dcr dicsmaliue Cil- winner des SotLwarepo 


kclti aus 


USA isl: 






Lothar Gents, GeibelsiralW 75. 4WMI 


Diisseldorfl 


Und nun wieder ab mil Euren Tips a 


den 




TIOTer Workshop Rheirdand 






Depl. Allgemeur + Software 






c/o Mike Heoser 
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Music-Player: Ext.-Basic-listing 




Tuning: 1 28 K 
plus Centronics' 
Interface 



TI Special 



Q 

Lehrreich: 



^tang erwartet: 
Tl-Assembler-Kurs III 



™«St.-Nr. Tl 4 



Zeitsparend: 
Turbo-Assembler 




Tl 99/4A 



Music-Programmer: Ext.-Basic-Listing 



J DENNlflliHClFr 



- ZN(i*(ZNR)=CHR*(INTi:ZNB/25E))5i:;HR:»tZ 



] CONVERT": : " 



Computer Konlakl 6-7/87 



i : z*!-i?;-ir» i:.ooi ■.,: i*s ■ : ■! ,, <' ,l s.cHi- * 1 1 7&s!.i:hp*c ie.* ■?,c-Bt 



Music-Editor: Ext.-Basic-Listing 



Tl 99/4A 



Computer Kontakt 6-7/87 



"COMPOSER - "[i"l : 



; NOTES/MINUTE": 



> INPUT SIR* I K+KP+1 )***k" " "■* 

', if (S-^'-HANQE" THEN BOSUn'sSO 

J IF k»."plAY" THEM G05UB 450 : 

!l [F <*="RED0" THEN SOSl !E< MO 
. . ....:.. r : :■■■. .,■.:■■.."■ ■■..-.■ : 



E FiLE BEFORE PROCEEDIN 



, PRINT "ERR- VALUE" 



".■.■.|:oi<S*,LENCS» 
i*=SEliI(SS,i,LEN(3»l- 






Tl 99/4A 



'lcnnis Si« ^ ,' 



Ext.-Basic-Listing 

100 I TENNIS CTI-99) 



_ PDBITICNC*6,X 



i CALL J0VST(2,X2,Y2>:: CALL MU I lUNim , 
ifit^ 2 lF*«6<4S OR V6<6-< AND M-0 DR V&>1B2 * 



: CALL BOUN1X50,- 



L PQSITION<#&,X 



Tl 99/4A 




mo TI99/4A 



1 03030303030303 » ) 



[, " 1 030 70F 1 F3F 7F FFS OCOE OF OF8FCFEFFFFFEFCFBF 0EOCO80 



_ SOUMDf J#20, S 



i CALL DEUSPRIT 



„ rK^0B0S0B0a0B0BOBCi800OO00000O00O00FFAA55AA55AA55AA55 

* OOOOOOOOOOOOOOOOOl 10 ! I 0OO00O008OB030B000, 

t. FFC0AO90B8B4a2BlBie2B4Ba90AOC0FFFF03O50gilI141S181412I1109Ci5O3FF 

*0O00O00OO00O00F90OOOO00O00000OlFFFH0e0B00O00000OFF0i01Ol OOOOOOOO 
. 606 06l>60603. - ' V 'OMOOOOOOOOOOOO 

.;. : .:: ■.,»5bAB56AeSaF0OO000OO00000 

ft 3^000O000O0OFiB3S6AD5AAB5AB563C01O3O60ClB3M0C04OC0*0C0e000O0OO 
A 3C56AB0SAAD56A351A0F00O00OO00O0COO0000i:' ' JiiieOCOBO^ 




CtZB, "FFB0e0F312 12(21 21 
160, "O20301O1C11O00O00O00O01O7OF0F04OE00S0COC0E0COC0C0C0C0EOF9FCFCO 
(132, l TF0O0OFF0O00E7MA595BDAiBIBDA5E7FF000OFF00007332324A465a5B5& 
(136, ,l BDA5A5BD00OIBEA5A5A5A5ASA4A3A5BDfTOI01FF0OFCOS7C407CO4F4i4F4 
( 40 , " 1 03030303030303FC040505040602ClCOCia04<>40aOOOOC12FFaOC040603Sl 



i CALL SDUND(350,- 



102 Tl 99/4 A Computer Karrtakt 6- 

Multiplan (Teil 2) ,";,'S»7J"».™ " 5~£f< 

r v fcummt. Naih iweimali«cr Fisi- ENTER I At* JlJ dc: 

Hcute wollen wir uffi e inem Jeweils die civ Spate rod B*f TOO If I * X .■■.■l.-,i, !i tn wir COPY-Funklinn 



TTN L) (Zelle n -Cursor geht 



. Es handelt sich folglich 



i Ubi.TMiif ;n . ] |' %:h M / ;, : ., n .- l - v :!,.,i-. 

Efcursormzc |:| ;;,, t :;;;'. : II :;|.'.,., : . 

ttimmt Ot Mart, eiMI Spate CIbl;hcine , 1 

jjleicteeitie spring! | ith ^i, It! all0 |,*if-ir» 



■ (FORMAT-M 
fen aiillijii 



\Lil:i!yhiu f M.C>K|- «;irl S .L. 
.,..■. ., l!- .'I',' 1 


^:i:"Wii;.:l-.l'l-.eitcii. iliu wir 


M."-.-. : ,ilt-...IukH^h , I:.!'i: '*ei'.vn. 


ibgesc 


II 


RFiAl.i Kir,k;nriM",-]«|-:!ll- 
ien. .i;i -it mi- '■::■ :i..T hm;iN. 


IE 



aafll ENTER (AbschluB 



TI99/4A 






aelmlL'n ami m.l.- 



l trloK an Sprimsi 



I nicht dnppcll abspeiclie, 



lie Folgenmisile men undeii 






Pilot99 






Verfilgung. Her linn (CA 









LOOP- !c Aim 



Anzeigenschlufi 

fur Computer Kontakt 

8-9/1987 

istder 29.6.1987 



Computer Kontakt 6-7/87 



Disketten-Umschlage 
selbst gentacht 






r:-~~ 


*™?"nZ 


,i:..:K 571 


VARIABLE S!l 


DISI'1 AY 






Ext.-Basic-Listing 



I 0431/7235G6 



Computer KonraW 6-7/87 




Computer Kontakt 6-7) 



DSR-Chip und Track-Aufbau 



urn 


"*■ 


STEP OUT 


1 o h v ffl'v ™ 



LliimI..- Didne Sektc.rlS nE e(Sffl) 

DoppclU' VJidue Dala-SeparamrflFF) 



Computer Kontakt 6-7/87 
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Computer Kontakt a .'[):• 



KLEINANZEIGEN 



■■■ 



w^m 



40°~DM! 



Computer Kontakt 6-7, 



KLEINANZEIGEN 









KSKKST Sg«THJST?i 



L "m *.' .T^^, ^ Seikosha SP 1200AS 

/Jg— ZZ.V -A aw: &so.- 



S*J 



KLEINANZEIGEN 



Die SuDEr-Hi.fsriishEtlE fur lh™ PlUfil! 




KLEINANZEIGEN „ 



Komplettes neuwertiges 
Entwicklungs-Systempaket 
HP 64000 S 



12 -KByle- E.tuI . -Spel c 



Hjjai:ti;a;[;iJMia 



Korrektur 



Wer kann Hilfe bei Adventure-Spielen 
geben? Wer kennt Losungswege, Tips, 
Strategies Pokes oder ahnliche Hilfen ! 



Bestellschein t fir private Kleinanzeigen 


1 ' 




















114 FUNDGRUBE 



Computer Kg nH 



Computer-Info *j*^ 
in der Diskothek con^a. 




fiirTalefonpiralen. 
BeiCK fur 33.33 DM. 
BeslellnummetH50U, 
Bestellscriein S. 67 



aa 



Ausgaben 

Aniahl der Hefte 

Seilen 

laben, Zahlen. Zeichen 

Bisheriger Preis 

Kennwott 

Porto 

Pteis fur Verpackung 

Preis 

Druckfehler 

Bestafigung 




22 Mark 



Bestellschein 



Uefem Sie mir bilte die 800.000 Buchsta- 
ben. Zahlen und Zeichen wie oben ange- 
geben zum Preis von 22 Mark. 
Scheck liegt bei. 



